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

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

Задать свой вопрос
Милена
только двузначных чисел больше ноля либо вообщем всех двузначных чисел
1 ответ

Ответ:

Изъясненье:

var s,i: integer;

s := 0;

for i:= 10 to 99 do

begin if i mod 2 = 0 then

s := s + i;

end

write('s = ', s)

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


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

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

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

Войти на сайт