• составить программу выводящую на экран сумму всех чётных чисел в промежутке от 12 до 30

Ответы 1

  • var sum,i:longint;

     

    begin

     

    sum:=0;

    for i:=10 to 30 do

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

     

    write(sum);

     

    end;

  • Добавить свой ответ

Войти через Google

или

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

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

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