Вывести на экран двузначные числа и их количество, - вопрос №56517682 от 089280ig 30.12.2022 01:03

Question

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

089280ig · 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....