Задать вопрос
ИнформатикаИнформатика
31 марта, 23:27

Информатика. Тема: Оператор ветвления на Паскале

Задача

из 4 величин определить наименьшее

решать типо:

Program ...

begin

readln и т. д.

+3
Ответы (1)
  1. 1 апреля, 00:08
    0
    Program z1;

    var i, n:integer;

    a:array [1 ... 100] of integer;

    begin

    readln (n);

    for i: = 1 to 4 do

    begin

    readln (A[I]);

    end;

    for i : = 1 to 4 do

    begin

    If A [i] > n then writeln (A [i]);

    end; readln; end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Информатика. Тема: Оператор ветвления на Паскале Задача из 4 величин определить наименьшее решать типо: Program ... begin readln и т. д. ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы
Помоги с ответом
Какое наибольшее число плоскастей можно проаести через различные пары из четырех параллельных прямых
Нет ответа
Бесконечная десятичная дробь устроена следующим образом. Перед десятичной запятой стоит нуль. После запятой подряд выписаны все целые неотрицательные степени некоторого однозначного натурального числа p. В результате получается рациональное число.
Нет ответа
Почему при упоминании о лимоне у человека выделяется слюна? случается ли такое у людей которые не ели лимоны?
Нет ответа
Значение аппендикса, кратко
Нет ответа
Почему в 27 веке люди часто болели
Нет ответа
Главная » Информатика » Информатика. Тема: Оператор ветвления на Паскале Задача из 4 величин определить наименьшее решать типо: Program ... begin readln и т. д.
Регистрация Забыл пароль