Дано натуральное число n (где n больше или равно нулю). вычислить: z=2*5**(3n-1). нужно написать программу в паскале вида program-var-begin-writeln-write-read-end и т.д. и т.п.
195
398
Ответы на вопрос:
Var n, i, z: integer; begin write('n='); readln(n); if n = 0 then writeln('z=-1') else if (n < 0) then writeln('введено отрицательное число') else begin z : = 1; for i : = 1 to n do z : = z * 1 * (3 * i - 1); writeln('z=', z); end; end.
Популярно: Информатика
-
Аришка866831.03.2021 18:04
-
superparty10.01.2021 17:53
-
tat32103.02.2022 22:07
-
Lubov08030119.08.2020 12:59
-
sagunush1331.05.2020 12:47
-
анна226426.01.2023 04:38
-
karrygreenk23.06.2022 11:43
-
snddrayuk09.06.2021 17:22
-
stoun201816.07.2022 13:22
-
Fizun07.08.2022 02:13