Вводятся три целых числа.Определить каое из них наибольшее.
Вводятся три целых числа.Определить каое из них наибольшее.
Ответ(ы) на вопрос:
Гость
var
i, x, max: integer;
begin
readln(max);
for i:=1 to 2 do
begin
readln(x);
if x>max then max := x;
end;
writeln(max);
end.
Не нашли ответ?
Похожие вопросы