Написать программу на яп паскаль: из чисел от - вопрос №4238421099 от настя7322 03.04.2021 21:10

Question

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

настя7322 · 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...