Вывести на экран двузначные числа и их количество, - вопрос №5651266 от 1234567890ваня 12.01.2021 14:11

Question

Информатика: Вывести на экран двузначные числа и их количество, у которых при умножении на 2 сумма цифр увеличивается на 5. через цикл for нужно решить

1234567890ваня · Answer

Program proga;var i, m, k, s1, s2:integer;beginfor i:=10 to 99 do begin m:=i;s1:= m mod 10 + m div 10;k:=i*2;s2:= k mod 10 + k div 10;if (s2 - s1 = 5) then write(i, , ); end;end....