Нужно для программы pascal! из чисел от 10 до 99 вывести те, сумма цифр которых равна n и само число делится на m.
278
481
Ответы на вопрос:
Var n,m,s,q,w,e: integer; begin read(n,m); for s: = 10 to 99 do begin q: = s div 100; w: = s div 10 mod 10; e: = s mod 10; if (q+w+e=n) and(s mod m = 0) then writeln(s); end; end.
Объяснение:
Yaxshi oʻzin yaxshimisan ayt nega jimsan ayt nega jimsan ayt nega jimsan ayt nega jimsan ayt nega jimsan ayt nega jimsan ayt nega jimsan ayt nega jimsan ayt nega jimsan ayt nega jimsan ayt nega jimsan ayt nega jimsan ayt nega jimsan ayt nega jimsan ayt nega
Популярно: Информатика
-
Darya1706108.11.2020 17:28
-
alihan24225.11.2021 13:41
-
selenkovaanasta04.04.2021 11:27
-
глупыйлолик3401.07.2022 14:06
-
sabinaqUliyeva14.11.2020 13:29
-
антон77819.09.2021 10:18
-
Табалаев17.09.2020 01:26
-
Сонькамя19.04.2023 10:25
-
zhenyakozyrkova14.01.2023 22:00
-
SonicAndDash02.10.2021 18:34