Написать программу на яп паскаль: из чисел от 10 - вопрос №4247441099 от Sonia369 01.06.2022 22:39

Question

Информатика: Написать программу на яп паскаль: из чисел от 10 до 99 вывести те, сумма цифр которых равна s ( чтобы в программе были формулы по нахождению p1 и p2 и чтобы программа была выполнена через операторы div и mod,желательно с объяснением

Sonia369 · Answer

var k,s, p1, p2 : integer; begin write( s = ); readln(s); for k:= 10 to 99 do begin p1:= k div 10; p2:= k mod 10; if p1+p2=s then writeln (k); end; end.Пример:s = 1239 48 57 66 75 84 93...