Даны 3 числа- A, B, C. Определить максимальное число.
Даны 3 числа- A, B, C. Определить максимальное число.
Гость
Ответ(ы) на вопрос:
Гость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.
Гостьмаксимальненькое число С
Не нашли ответ?
Похожие вопросы