• помогает пожалуйста
    работа в паскале
    составьте программу вычисления суммы всех трехзначных чисел кратных 4

Ответы 2

  • program zadacha1;var s,i:integer;begins:=0;for i:=100 to 999 doif i mod 4=0 thenbegins:=+i;writeln('Сумма всех трёхзначных чисел, кратных 4=',s);end;end.
    • Автор:

      doticmp
    • 5 лет назад
    • 0
  • uses crt;var n, sum:integer;beginn := 100;while n < 1000 do    begin      sum += n;      n += 4;    end;    writeln('Сумма всех трёхзначных чисел, кратных 4= ',sum);end.
    • Автор:

      isabell
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years