Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
LanaAnn
14.12.2021 02:06 •
Информатика
Составте программу вычисления произведения 1*3*5**(2*n-1).
Показать ответ
Ответ:
Виктория1950
22.07.2020 23:54
Паскаль ABC.NET:
var
s,i,n:integer;
begin
writeLn('Введите n');
read(n);
i:=1;
s:=1;
while i<=(2*n-1) do
begin
s*=i;
I+=2;
end;
writeLn('Произведение равно ',s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
даня1163
27.07.2020 17:31
-125 200 10 6 43 11 объевите м. а в паскале а[4] а[а[4]]...
IgnatBakaev
10.02.2021 13:49
Елгілеңдер. Раім редакторында суретті көшіру үшін қандай батырманы пайда танабыз?АТЕрекшеле Выделить )Ә) Авару Копировать)АҚор в теить).Paint редакторында фигураның «ізін қалдырып»...
elvinsasylbaeva
16.02.2020 05:27
Сколько единиц в двоичной записи числа 8^2014 - 2^614 + 45?...
gyulmalievasab
27.12.2020 15:04
Как вы думаете,безопасно ли в интернете: а)указывать своё имя; б)указывать номер телефона; в)оплачивать что-то с папиной банковской карты; г)оплатить игру или аккаунт в интернет-библиотеке...
карпать1картошку
27.12.2020 15:04
Составить для вычисления функции f(x) на отрезке [a,b] с шагом h. f(x)=1/2sinx/4+1. соствить...
nastyaiermakova12
05.02.2021 13:52
Пусть исходный алфавит содержит следующие символы: зашифруйте с шифра вижинера и ключа яблоко сообщения: криптостойкость...
Вико1234
08.03.2022 04:05
Из аптеки вышли 5 человек. в ней осталось на 2 человека меньше. чем вышло. сколько человек осталось в аптеке краткое решение...
alina151103
08.03.2022 04:05
Потемнело и нахмурилось небо и побежали черные грозовые облака выписать словосочетание...
soplador
18.12.2021 17:53
Чим соціально-побутові пісні відрізняються від народних?...
Response21
18.12.2021 17:53
Просто нужно объяснить зачем поставили запятую.признаю лучшим! 1) до самой смерти,пока бьется сердце, ни минуты не стоять на месте, все время двигаться вперед в святом служении...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
s,i,n:integer;
begin
writeLn('Введите n');
read(n);
i:=1;
s:=1;
while i<=(2*n-1) do
begin
s*=i;
I+=2;
end;
writeLn('Произведение равно ',s);
end.