Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

С клавиатуру набраны случайным образом 3 числа. Составить программу вычисления максимального из набранных чисел.

Ответ оставил Гость

Program abc
var: x,y,c integer
begin
clrscr
writeln( "введите 3 числа")
readln (a,b,c)
if a>b and b>c then
writeln(a "большее")
else
if awriteln ( b "большее")
else
writeln (c "большее")
readkey
end.
может забыл что то,давно не писал на паскале