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

0 голосов
29 просмотров

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


Информатика (34 баллов) | 29 просмотров
Дан 1 ответ
0 голосов

Var 
a,s:integer;
begin
a:=9;
s:=0;
while a<99 do<br>begin
inc(a);
if (a mod 2 = 0) then
s:=s+a;
end;
end.

(225 баллов)