profile
Опубликовано 5 лет назад по предмету Информатика от Natasha4565674

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

  1. Ответ
    Ответ дан moboqe

    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.

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