Предмет: Информатика,
автор: wolfray777
Вывести все двухзначные числа с чётной суммой цифр. (Программа на Paskal)
Ответы
Автор ответа:
0
Ответ:
program SumNum;
var
i: Integer;
begin
for i := 10 to 99 do begin
if (i div 10 + i mod 10) mod 2 = 0 then
Write (i, ' ');
end;
ReadLn;
end.
Интересные вопросы
Предмет: Биология,
автор: mssssssss44
Предмет: Химия,
автор: SofiaNov13
Предмет: Математика,
автор: appsoaos
Предмет: Физика,
автор: Нагибаторололо