Задать вопрос
11 февраля, 14:10

Найти все числа в диапозоне от 20 до 450, кратных 4. Подсчитать все числа. применить цикл с параметром

+2
Ответы (1)
  1. 11 февраля, 14:33
    0
    Var i, s:integer;

    begin

    s:=0;

    for i:=20 to 450 do

    if (i mod 4 = 0) then s:=s+i;

    writeln (s);

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Найти все числа в диапозоне от 20 до 450, кратных 4. Подсчитать все числа. применить цикл с параметром ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы