Помогите, кто разбираетсяНаписать программу в Паскаль: найти наибольшее из 3 заданных...

Question

Помогите, кто разбирается
Написать программу в Паскаль: найти наибольшее из 3 заданных чисел a, b и c

Answer 1

Простая программка для сравнения 3 чисел(min_max_1):
Program Min_Max;
var a,b,c,min,max:integer;
begin
write('Введите 3 числа для сравнения (через пробел) : ');read(a,b,c);
min:=a;max:=a;
if b>max then max:=b;if bif c>max then max:=c;if cwriteln('Максимальное число : ',max);
writeln('Минимальное число : ',min);
readln;
end.