Програма на паскалі
Введіть з клавіатури n будь яких чисел. З'ясувати яке число було введено раніше, максимальне чи мінімальне
Ответы
Ответ дал:
3
Ответ:
Всё просто.
Объяснение:
var
i, min, max, n: integer;
begin
min:=MaxInt; max:=-MaxInt-1;
Write('Введите 10 чисел: ');
for i:=1 to 10 do begin
Read(n);
if n<min then min:=n;
if n>max then max:=n;
end;
Writeln('min=',min);
Writeln('max=',max);
end.
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
8 лет назад