Rimikal
6 год назад
Даны три целых числа. Вывести на экран наибольшее из трех введенных чисел.
ОТВЕТЫ
Алиса
Oct 24, 2020
Var a,b,c:integer;
Begin
Write('Введите три целых числа: ');ReadLn(a,b,c);
if b>a then a:=b;
if c>a then a:=c;
WriteLn(a);
End.
Begin
Write('Введите три целых числа: ');ReadLn(a,b,c);
if b>a then a:=b;
if c>a then a:=c;
WriteLn(a);
End.
53
Смежные вопросы:
