• Предмет: Информатика
  • Автор: Natasha4565674
  • Вопрос задан 8 лет назад

Написать программу определения минимального из введённых N чисел. Паскаль, цикл-for. Помогите пожалуйста!!!

Ответы

Ответ дал: moboqe
0

program Comparison;

var

N, i, num, min:integer;

begin

write('Введите количество чисел: ');

readln(N);

write('Введите число: ');

readln(num);

min:=num;

for i:= 1 to (N-1) do

begin

readln(num);

if (num<min) then min:=num;

end;

writeln('Минимальное число в последовательности: ',min);

end.

Ответ дал: Natasha4565674
0
Спасибо,но что за переменная num?
Ответ дал: moboqe
0
number - число, которое ввёл пользователь (сокращено до num)
Вас заинтересует