Question

Даны 3 числа- A, B, C. Определить максимальное число.

Answer 1

Program Pr1;
uses crt;
var a,b,c,max:integer;
Begin
clrscr;
readln(a,b,c);
if a>b then max:=a
else max:=b;
if max>c then writeln(max)
else writeln(c);
end.

Answer 2

максимальненькое  число     С