Question

C клавиотуры вводится натуральное число, которое определяет кол-во вводимых чисел с клавиотуры целых значений. Пользователь вводит указанное кол-во целых значений.А программа выводит самое большое и самое маленькое значение из вводмимых. Напишите программу на Pascal!!!

Answer 1

Program n1;
var a,min,max,i,n: integer;
begin
readln(n);
readln(a);
min:=a;
max:=a;
for i:=2 to n do
begin
readln(a);
if a>max then max:=a;
if a<min then min:=a;
end;
writeln('min=',min);
write('max=',max);
end.