• ИНФОРМАТИКА 8 КЛАСС.
    ПОМОГИТЕ ПОЖАЛУЙСТА, ДАЮ 20 БАЛЛОВ!

    question img
    question img

Ответы 3

  • как?
  • да так! легко и просто !
    • Автор:

      ariasyuyl
    • 6 лет назад
    • 0
  • program a1;

    var x1, sum:integer;

    begin

    sum:=0;

    for x1:=1 to 100 do

    if x1 mod 2=0 then sum:=sum+x1;

    writeln(sum);

    end.

    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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