Решите пожалуйста задачу в паскаль.Найти все целые двузначные числа, сумма цифр в которых равна 8.
Решите пожалуйста задачу в паскаль.
Найти все целые двузначные числа, сумма цифр в которых равна 8.
Гость
Ответ(ы) на вопрос:
Гостьvar
i : integer;
begin
for i := 10 to 99 do
if i mod 10 + i div 10 = 8 then
writeln(i);
end.
Не нашли ответ?
Похожие вопросы