Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
danchikpozitiv
17.11.2020 11:11 •
Информатика
Впаскале: составить программу, вычисляющую n факториал (n вводится с клавиатуры).
Показать ответ
Ответ:
sofyaamosovap0cc8l
21.09.2020 19:20
Var n,i,c:integer;
begin
c:=1;
readln(n);
for i:=1 to n do
c:=c*i;
writeln(c);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
popovaviktoriy3
28.01.2020 01:40
Напишите программу на языке питон! ! ! написать программу на языке питон (python) 1. в компьютер вводятся два числа. если первое больше второго, то вычислить их сумму, иначе - произведение....
Korolev776
23.07.2022 01:49
Почему полномометражные фильмы с высококачественным звуковым сопровождением невозможно хранить на cd-r-носителях?...
skuryan
02.12.2020 04:56
Какой минимальный объем памяти (в кбайтах) необходим для хранения 4-х страниц экранного изображения, если разрешающая экрана 640 ´480 пикселей, а количество используемых цветов равно...
daschkavolf
08.03.2022 09:45
Написать программу на языке pascal: : вводятся целые числа до первого числа, которое меньше двух. определить, сколько простых чисел было введено. описание переменных: q - счетчик простых...
knestor
06.02.2022 02:44
Нарисуйте блок-схему с операторами: 1.если в комнате темно, тогда включи свет. 2. если имеется задолженность, учи лекции, иначе отчислят. 3.проверьте равно ли введенное число некоторому...
AmooQ
01.01.2022 12:16
Даны два целых двузначных числа a и b. если их значения не равны, то присвоить переменным значения 33 . вывести новые значения переменных. решить, !...
minikotik322
06.07.2020 08:28
Вопросы по exel: як підрахувати суму вмісту кількох клітин?...
adilimanaliev03
06.07.2020 08:28
Запишите несколько примеров исполнителей-технических устройств, с которыми вы встречались в повседневной жизни....
Никас111
06.07.2020 08:28
Посчитать сумму элементов массива, заполненного случайными числами, и произведение максимального и минимального элементов...
Vladislav525245264
13.09.2022 07:22
Скорость передачи данных через adsl-соединение равна 1024000 бит/с. через данное соединение файл размером 2000 кбайт. определите время передачии файла в секунду. если можно с обьяснением....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
c:=1;
readln(n);
for i:=1 to n do
c:=c*i;
writeln(c);
end.