Флегонт
5 год назад
Написать программу в PascalВывести на экран наибольшее из трех чисел
ОТВЕТЫ
Василий
Oct 24, 2020
programm pr2;
var a,b,c:real;
begin
read(a,b,c);
if (a>b) and (a>c) then writeln (a) else if (b>a) and (b>c) then writeln(b) else writeln(c);
end.
var a,b,c:real;
begin
read(a,b,c);
if (a>b) and (a>c) then writeln (a) else if (b>a) and (b>c) then writeln(b) else writeln(c);
end.
585
Смежные вопросы:
