Ответы на вопрос:
Program one; var c: array [1..99999999] of integer; l,i,n,m: integer; begin readln(n,m); l: =1; for i: =n to m do beginl: =l*i; end; writeln(l); end.работает проверял(если правильно понял то нужно найти 1*2*3*4*n)
Популярно: Информатика
-
sany83114.05.2020 18:58
-
Дінислам20.12.2020 10:37
-
CoOlbOY2003g04.05.2020 18:49
-
Вова1234567891209.12.2020 01:44
-
Машина002.10.2021 07:41
-
mintella244220.03.2020 06:26
-
Pashet00726.03.2022 22:27
-
messageman111.05.2023 22:34
-
Черничка2107.09.2022 03:48
-
Arisha22414.05.2022 16:05