Question

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

Answer 1

На каком языке написать?

Answer 2

var sum,i:integer;
begin
i:=2;
sum:=0;
repeat 
sum:=sum+i;
i:=i+2;
until  i>9;
write(sum);
end.



var sum,i:integer;
begin
i:=10;
sum:=0;
repeat 
sum:=sum+i;
i:=i+1;
until  i>99;
write(sum);
end.