найти сумму всех двухзначных четных натуральных чисел
Ответы на вопрос
Ответил archery
0
var
i, s: integer;
begin
s := 0;
for i := 10 to 99 do
if i mod 2 = 0 then
s := s + i;
writeln(s);
end.
i, s: integer;
begin
s := 0;
for i := 10 to 99 do
if i mod 2 = 0 then
s := s + i;
writeln(s);
end.
Новые вопросы
Математика,
2 года назад
Математика,
2 года назад
Физика,
9 лет назад
Алгебра,
10 лет назад
Математика,
10 лет назад