Составить программу, которая обретает сумму всех чётных двузначных чисел

Составить программку, которая находит сумму всех чётных двузначных чисел

Задать свой вопрос
Дарина Костроменко
Язык программирования?
1 ответ

program raf105;

var i,sum: integer;

begin

for i:=10 to 99 do

 if (i mod 2)=0

   then sum+= i;

writeln(sum);

end.

Язык PascalABC

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт