Составить программу вычисления суммы квадратов первых n членов натурального ряда, каждое из которых при делении на m дает в остатке f. (паскаль)
280
354
Ответы на вопрос:
Var x, n, m, f, s: integer; begin write('введите n: '); readln(n); write('введите m: '); readln(m); write('введите f: '); readln(f); for x : = 1 to n do if(x mod m = f) then s : = s + sqr(x); writeln('сумма: ', s); end.
Популярно: Информатика
-
dauren13020.07.2020 02:19
-
Ganshit14.05.2020 04:35
-
viktoriytamaza23.03.2021 16:22
-
aspier201616.06.2022 05:46
-
alexandrafortun13.10.2020 13:00
-
ник504031.05.2020 21:10
-
murzyeva197014.05.2020 06:37
-
vylko777Leybe24.03.2022 14:43
-
Влад88003535512.02.2021 01:41
-
galitskovao07.06.2020 05:05