Войти Регистрация Спроси ai-bota

Дано натуральное n.вычислить y=13(2n-1).программа в паскаль абс.

Показать ответ

Ответ:

пупсик145

01.10.2020 20:00

Var n,k,i:integer;
y:longint;
begin
readln(n);
k:=1;
y:=1;
for i:=1 to n+1 do begin
y:=y*k;
k:=k+2;
end;
writeln(y);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

VasilisaBelkina

05.05.2021 20:30

Чему соответствовал каждый значок финикийского письма? как его можно назвать?...

Лчший

03.06.2023 20:31

Написать программу, которая выводит на экран первую цифру числа, введёную с клавиатуры. (...

linasysueva01

14.11.2021 05:30

Сколько среди чисел от 5584 до 6654 (включительно) таких чисел, для которых выполняются одновременно два свойства: они простые их сумма цифр четна...

Evelina0889

08.03.2021 04:28

На далекую планету приземлился робот и начал собирать себе друга. каждый день количество роботов удваивалось, и через 14 дней ими заполнилась вся до той поры приступающая...

TheGrigory

04.12.2022 00:42

Какие данные не могут находиться в ячейке: 1) формула 2) лист 3)текст 4) число...

maks312017

04.12.2022 00:42

Собака бульдог вансар.впишите имена собственные....

olegkuchmak

04.12.2022 00:42

Из акулово в рыбницу ведут три дороги, а из рыбницы в китово — четыре дороги. сколькими можно проехать из акулово в китово через рыбницу? изобразите соответствующие...

Kotik20052005

04.12.2022 00:42

Вячейку введены символы a1+b1.как excel воспримет эту информацию? 1) ошибка 2) формула 3) текст 4) число...

aliaganieva70

16.09.2022 11:11

Декодировать изображение и найти объём видеопамяти. дано: разрешение: 12х8, глубина цвета 1 бит. код: 1838301214183060a8444400...

korzhek05

21.03.2020 22:40

Требовалось написать программу, при выполнении которой с клавиатуры считывается натуральное число n, не превосходящее 10^9, и выводится минимальная цифра этого числа....

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку