Как написать программу для pascal abc которая считает факториал числа который вводит пользователь
246
293
Ответы на вопрос:
//pascal abc.net v3.0 сборка 1111 //обойдусь без .net-овских примочек var a,b,i: integer; begin readln(a); if a=0 then begin; writeln('1'); exit; end; if a< 0 then begin; writeln('не определён'); exit; end; b: =1; for i: =1 to a do b: =b*i; writeln('res=',b); end.пример ввода: 3пример вывода: 6
// pascalabc.net 3.0, сборка 1157 от 02.02.2016 begin var n: =readinteger('n='); if n< 0 then writeln(n,'! не определено: n< 0') else if n=0 then writeln('0! =1') else begin var p: biginteger: =1; for var i: =2 to n do p*=i; writeln(n,'! =',p) end end. тестовое решение: n= 138 138! =691778647261948849222819828311491035886734385827028118707676848307166514238979223884785249055995983385450621636277440066920043595627074569065446040152660143904127838730788278294186615891819670506731208704000000000000000000000000000000000
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
TopThan29.02.2020 12:14
-
Данил2864512.03.2022 07:30
-
sspamit23.12.2021 08:08
-
talex26052006в29.07.2022 08:40
-
sweater22weather17.08.2022 03:24
-
sgsfgff13.05.2021 06:48
-
Dhbdej05.07.2021 03:54
-
Agata1134509.03.2021 21:45
-
mmmmm3003.05.2023 23:33
-
Marièfar16.05.2020 02:38
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.