Найдите наибольшее из трех данных чисел (paskal abc)
Найдите наибольшее из трех данных чисел (paskal abc)
Гость
Ответ(ы) на вопрос:
Гостьvar a,b,c:integer;
begin;
readln(a);
readln(b);
readln(c);
if (a>b) and (a>c) then writeln(a);
if (b>a) and (b>c) then writeln(b);
if (c>a) and (c>b) then writeln(c);
end.
Не нашли ответ?
Похожие вопросы