Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
selix2017
16.05.2021 04:42 •
Информатика
Выписать фрагмент программы для решения указанной ниже и обосновать,почему был выбран тот или иной вариант оператора цикла: a) вычислить факториал некоторого числа р; б) факториал некоторого числа равен р,найдите это число; (pascal abc)
Показать ответ
Ответ:
1innic11
24.09.2020 11:54
Ещё 0!=1 нужно учитывать.
F := 1;
if N>0 then
for i := 1 to N do F := F * i;
WriteLn(N, '! = ', F);
0,0
(0 оценок)
Популярные вопросы: Информатика
global234
29.02.2020 10:29
Даны две стороны параллелограмма а и в, угол между ними равен а. найти площадь параллелограмма s=a*b*sin a. написать программу...
milankagl
31.12.2020 07:49
Составить блок-схему и программу на языке паскаль: 1) дана сторона квадрата. найдите площадь квадрата2) задан радиус окружности .найдите площадь и длину окружности3) даны три действительных...
123451529
14.06.2021 13:41
На берегу бурной реки встретились горилла с двумя детьми и шимпанзе с двумя детьми. к берегу прибилось бревно, бревном может только взрослая особь,а если горилл будет больше чем...
Maer12
04.05.2023 05:46
Число 2018 записывается как ? в римской сс....
Sayva11
23.01.2023 06:09
Program pr_1; var x,y,sum, umn: integr; begin write ( x= ); readln (x); write ( y= ); readln (y); sum:=x+y umn:=x*y; writeln ( sum= ,sum); writeln ( umn= ,umn); readln; end найдите...
Tishukvasiliy
29.01.2021 03:18
Задание с кратк,дание с кратким ответом. Запишите доменное имя компьютера, за-истрированного в домене верхнего уровня ru, домене второго уровняschools и имеющего собственное имя...
Halimali10
22.06.2021 23:36
Складить блок -схему фрагмента алгоритму , у якому в цикл з личильником вкладено неповне розгалуження. Пояснить виконання складеного фрагмента,...
уже3
12.05.2023 05:40
Составьте программу, которая обрабатывает следующие данные: ФИО, знак зодиака, дата рождения. Вывести список людей, имеющих тот же знак зодиака, что и введенная дата с клавиатуры....
mariakit001
10.11.2020 17:47
Выберите верную запись формулы для электронной таблицы. Укажите правильный вариант ответа: C3=C1+2*C2 С5С5+23 =С2*С3-С4 C3=C1+2*C2...
нурана4
01.01.2023 23:15
Алгоритм вычисления значения функции F(n), где n – натуральное число, задан следующими соотношениями: F(1) = 9 F(n) = F(n–1) * n, при n 1. Чему равно значение функции F(2)?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
F := 1;
if N>0 then
for i := 1 to N do F := F * i;
WriteLn(N, '! = ', F);