Kate00013

30.07.2022 23:04 •  Информатика

Народ, можете проверить , мне просто качать прогу не , короче хотелось бы что бы на проге geany

вот : даны 3 числа вывести наибольшее и наименьшее

var a,b,c,min,max: integer;

begin

writeln('введите три числа: ');

readln(a,b,c);

max: =a;

if b> max then max: =b;

if c> max then max: =c;

min: =a;

if b
if c
writeln('минимальное: ',min);

writeln('максимальное: ',max);

end.