Нужно сделать в паскале: составьте программу, составьте программу, которая вычисляет произведение чисел от 1 до n. где n вводится с клавиатуры.
150
398
Ответы на вопрос:
Var p,i, n: integer; begin p: =1; writeln('введи n'); readln(n); if n> =1 then begin for i: =1 to n do p: =p*i; writeln(p); end else writeln('n> =1'); end.
Популярно: Информатика
-
nyushanyusha20owzt3629.01.2022 11:39
-
Sokolova232714.03.2021 01:29
-
niga2422.05.2021 05:45
-
joni20042803.08.2021 07:28
-
Dagrf18.04.2022 10:21
-
zajigalka200123.11.2022 17:55
-
summani200526.09.2022 20:50
-
Ira121409.02.2021 09:10
-
SHIRINA1107.07.2020 03:38
-
www15212.03.2022 18:00