Question

De la tastatura se introduc 3 numere intregi. De afisat numarul maxim intre aceste 3 numere.

Answer 1

program p1;
var a,b,c:integer;
begin
readln(a,b,c);
if a>b then b:=a;
if c>b then b:=a;
write(b);
readln
end.