Вычислить значение выражения у = (z! - a!)(k-m). Вычисление факториала оформить в виде процедуры. (задачу оформить в Pascal)
100
432
Ответы на вопрос:
Program gt; var n,a,i,s,q: integer; begin read(n); read(a); s: =0; for i: =1 to n do begin read(q); if(q mod a=0)then s: =s+q; end; writeln(s); end.
Популярно: Информатика
-
kristinacelidze16715.07.2020 15:42
-
nastena54408.05.2023 22:16
-
Bars199515.03.2023 22:54
-
аааликкк4352701.11.2022 18:35
-
Польди07.03.2021 21:45
-
Caxap0324.07.2021 04:46
-
marimuravskap08uv012.10.2021 10:18
-
aidnovna26.06.2021 13:01
-
nikitakomer30.10.2021 03:13
-
violapi29.01.2021 10:14