tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Ая опять к вам с по информатике
Ая опять к вам с по информатике на pascalabc.net в синтаксисе pascal abc. дано натуральное число n. вычислить n! (факториал числа n вычисляется по формуле 1*2*3*…*n, например, факториал числа 5 равен 1*2*3*4*5=120).
lyubimuchkaozd15q
3 01.09.2019 10:40
0
Ответы
DedPerdun
06.10.2020 09:34
Var
i,n:integer;
p:real;
begin
Write('n='); Read(n);
p:=1;
for i:=1 to n do p:=p*i;
Writeln(n,'!=',p)
end.
Пример
n=12
12!=479001600
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kghhyyggr456
28.05.2020 08:40
3. Составьте программу вычисления площади и объема куба....
Vitaly536218
28.05.2020 20:42
Реализовать кодом поворот матрицы 5 х 5 элементов на 90 градусов по часовой стрелке. Написать надо на...
kozlovavika200
06.05.2021 11:31
Сноска размещается внизу последней страницы текстового документа это?...
хзхзхзхззз
06.05.2021 11:31
В реферате надо будет указать мое имя и фамилию. Подготовьте реферат средствами текстового редактора Microsoft Word. Придерживайтесь правил оформления деловой документации....
maryanazarfdFj
27.07.2019 18:40
Как в массиве найти наибольшее число(python)?...
saulefazylovnap00xfc
12.08.2019 15:00
Может ли термин состоять из нескольких слов?...
Fanapav
01.03.2020 19:24
Ребята нужна реклама школьной тиматики для газовой плиты...
kika007
01.03.2020 19:24
В четырехзначном числе зачеркнули все четные цифры.Вывести полученное двузначное число. Сделать в редакторе блок-схем....
Zangerange
01.03.2020 19:24
Сколько будет 2*2? Я не знаю, зачем это, но вот... Халявные )...
vasifalieyev001
01.03.2020 19:24
Продукты растительного происхождения отметь, закрасьте кружок зелёным карандашом а продукты животного происхождения красным...
Популярные вопросы
решить задачу и что написать внутри квадратика ?...
3
Задание 5. Задание на повторение.( ) Письменно ответить на во...
3
Предложите варианты экономии электроэнергии дома, в школе...
1
решить шахматическую задачу!...
2
. Із чим пов’язані зміни в назві імперії: Римська імперія —...
1
дала сколько будет незнаю:)Write a sentence with the words frightened,...
3
Элемент-э, Институт, Организация - И. О, Процесс-П, Явление...
2
Эссэ на тему подземные ресурсы Казахстана...
3
В группе туристов 20 человек. С жребия они выбирают 3 человек,...
3
Напишите реакцию гидролиза метилового эфира пропановой кислотой...
3
i,n:integer;
p:real;
begin
Write('n='); Read(n);
p:=1;
for i:=1 to n do p:=p*i;
Writeln(n,'!=',p)
end.
Пример
n=12
12!=479001600