Дано натуральное число n. вычислить у=1*3**(2n-1). составить программу на языке паскаль.

Ответы

МикаАбакирова 06.06.2020 23:32

Program n1;
Uses CRT;
Var i,n,m: integer;
begin
ClrScr;
writeln('Vvedite n');
readln(n);
i:=1; m:=1;
while i<2*n-1 do
begin
i:= i+2;
m:= m*i;
end;
writeln(m);
readln
end.

ПОКАЗАТЬ ОТВЕТЫ

Другие вопросы по теме Информатика

vektor9931oz1kb3 28.05.2019 09:50

Во вложениях! решите номер 33 и 34....

Деля2363 28.05.2019 08:25

Программирование с в этой вам дается последовательность a из нулей и единиц. требуется посчитать, сколько в этой последовательности отрезков, состоящих только из...

sergo196 02.04.2020 12:00

Розгалужуючий алгоритм - це:A) Присутність в алгоритмі хоча б однієї умови;B) Набір команд, які виконуються послідовно один за одним;C) Багаторазове виконання одних...

ghvcn 02.04.2020 12:00

Назвіть основну властивість алгоритму, яка говорить про те, що алгоритм повинен призводити до вирішення завдання за певне число кроків:A) Дискретність;B) Визначеність;C)...

avdzhrr 26.05.2020 15:48

Створіть проект у середовищі Lazarus для обчислення суми n чисел, перше з яких дорівнює х, а кожне наступне дорівнює квадрату попереднього....

наргиз68 10.02.2021 23:09

1) Рассматривается множество целых чисел, принадлежащих числовому отрезку [2894;174882], которые оканчиваются цифрой 8 и у которых сумма цифр больше 22. Найдите...

дашкатопикепи 10.02.2021 23:18

Всем привет: есть код import pygame WIDTH = 300 HEIGHT = 250 FPS = 30 BLUE = (0,0,255) WHITE = (255,255,255) pygame.init() x = WIDTH / 2 y = HEIGHT / 2 r = 10 motion...

kmtva04 28.07.2019 07:30

Дано четырехразрядное натуральное число, если оно четное, то найти сумму разрядов, если нет - сумму квадратов. (кумир или паскаль написать программу полностью)...

89825518635e 09.12.2020 13:55

Соч по химии 9-класс в ОМ...

Catco111 09.12.2020 13:56

Дайте название тексту, на казахском языке...

Дано натуральное число n. вычислить у=1*3**(2n-1). составить программу на языке паскаль.

Популярные вопросы