tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найти n! (n! =1*2*3*4*
Найти n! (n! =1*2*3*4* *n) число n запросить с клавиатуры
839010
1 22.09.2019 23:01
0
Ответы
Сенсей14
08.10.2020 10:51
//PascalABC.NET
//Версия 3.3.5, сборка 1650
begin
var n:=ReadInteger('n=');
write(n,'!=',range(1,n).Aggregate(Real(1),(a,b)->a*b));
end.
ПОКАЗАТЬ ОТВЕТЫ
ktjy123
08.10.2020 10:51
Var a,b: integer; begin b := 1; Readln(a); for var i := 1 to a do b := b * i; Writeln(b); end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
DJZargo
23.06.2020 14:00
Рассчитайте, какое количество фотографий можно сохранить на одной дискете, если известно, что каждая фотография имеет следующие характеристики: разрешение – 640×480 пикселей;...
Сникерс11
22.06.2020 13:01
978,8 МБайт перевести в байты, биты, килобайты и гигабайты....
Itupoypomogite1
20.04.2021 12:42
На вході маємо 2 числа програма запитує у користувача. Чому дорiвнюэ сума цих чисел? ( використайте input() та порівнює введення число із сумою двох перших чисел і вводить результат...
HateLove7
03.10.2019 03:20
Много 11. определите значение переменной z после выполнения фрагмента алгоритма: z: =0; i: =1; while i 1 do begin z: =z +1/i; i: =i-1 end; с объяснением и скажите что это, просто...
Пандochka
10.12.2020 10:17
с тестом (Python)1.Напишите программу, которая по заданным двум числам a и b, выводит на экран результат целочисленного деления и остаток, в заданном формате (смотри примеры)...
UskovaV99
10.12.2020 10:16
Граф построить и число которое получится...
milankae
10.12.2020 10:14
Перестановка цифр Дано трехзначное число \overline{abc} abc , в котором все цифры различны. Напишите программу, которая выводит шесть чисел, образованных при перестановке цифр...
nadyalewoxtphe
10.12.2020 10:13
Бітова частота звукового файла дорівнює 115 кбіт\с Обсяг файла становить 5 Мбайт Визначте час тривалості звукового файла вказавши ткількість хвилин та секунд...
грустнаякакахаха
12.09.2019 00:00
Меньше объяснений с сайтов, больше решения именно этих . просто, грубо говоря, решить хоть одно. 100 , но только ! возвести комплексные числа в степень. ответ дать в форме показателя...
lenaguba1974ayp06vyr
12.09.2019 00:00
Нужно. составь формулу для решения : 1) один токарь изготавливает k деталей 5 за часов, а другой за 6 часов n деталий. сколько деталей изготовят оба токаря за 8 часов? 2) всадник...
Популярные вопросы
Расскажите о разливе Нила,очень надо,...
2
42 бет 3 жаттығу Қазақ тілі...
2
Молярная масса электролита,который содержит ионы Ме3 + и сульфат-ионы составляет...
3
Чим відрізняється сільськогосподарська спеціалізація в країнах Північної, Південної,...
3
Do the Go globall quiz on page 21. Then listen and check your answers...
1
Bon, shunos, imiz, ona, guncha, paz, gi, lar, be, ib, li, soz, ga, siz qo shimchalari...
1
Вид хімічного зв язку у молекулі гідроген хлориду а)ковалентний полярний б)ковалентний...
1
3. Объединитесь в группы и выполните задания: 1группа Опираясь на статью учебника...
1
Составить 10 утверждений по теме: Кишечнополостные животные ....
3
Вычислить sin150= Sin15= Cos225= Cos 11p/2= Tg7p/2 С объяснением...
2
//Версия 3.3.5, сборка 1650
begin
var n:=ReadInteger('n=');
write(n,'!=',range(1,n).Aggregate(Real(1),(a,b)->a*b));
end.