Задать вопрос
ИнформатикаИнформатика
24 июля, 08:13

Найти произведение всех положительных целых чисел от А до В

+1
Ответы (2)
  1. 24 июля, 08:34
    0
    Var a, b, s, i:integer;

    begin

    s:=1;

    read (a, b);

    for i:=a to b do

    s:=s*i;

    writeln (s);

    end.
  2. 24 июля, 11:09
    0
    Var a, b, z:integer;

    begin

    readln (a, b);

    for a:=a to b do

    z:=a+b;

    writeln (z);

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Найти произведение всех положительных целых чисел от А до В ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы
Помоги с ответом
Какое наибольшее число плоскастей можно проаести через различные пары из четырех параллельных прямых
Нет ответа
Почему при упоминании о лимоне у человека выделяется слюна? случается ли такое у людей которые не ели лимоны?
Нет ответа
Значения слов: 1. Дельта 2. пороги 3. ил 4. папирус 5. оазин 6. фараон
Нет ответа
Объясните как определить заряд иона образуемого кислотным остатком и соответствующий оксид ... на примере H3PO4
Нет ответа
Найдите значение минус А если 1) a=3,8 2) a=-6,4
Нет ответа
Главная » Информатика » Найти произведение всех положительных целых чисел от А до В
Регистрация Забыл пароль