Question

СРОЧНО!!!! ДАЮ 30 баллов

Answer 1

var a,b,c,max:integer;
begin
readln(a,b,c);
if a>=b them max:=a else max:=b
if c>max them max:=c;
writeln('max=',max)
end

Пример
15 48 34
max=48