Среди двухзначных чисел найти сумму квадратов цифр которых делится на 13 составить программу с ! пааскаль
119
460
Ответы на вопрос:
var i,s: integer; begin s : = 0; for i : = 10 to 99 do if i mod 13 = 0 then s : = s + (sqr(i div 10)+sqr(i mod 10)); write(s)end.
Популярно: Информатика
-
aselkulmagambet24.04.2021 11:00
-
дан24320.06.2022 02:26
-
nosorpg0222.11.2022 00:48
-
НикитаЗеленюк28.02.2023 20:30
-
mrvipdanchannep0793v07.11.2020 18:12
-
антон77808.11.2020 08:38
-
baga2713.03.2023 09:15
-
wassilina01.10.2020 20:03
-
aydana04050513.08.2021 13:25
-
good12919.03.2023 02:49