Написать программу, которая вычисляет факториал числа, введенного с клавиатуры, используя цикл с постусловием. язык - pascal
146
192
Ответы на вопрос:
Var y: system.uint64; //большая цыфра же и положительная x, i: byte; //нет смысла большие числа брать слишком, переполнение будет begin readln(x); //принимаем y : = 1; i : = 1; repeat y *= i; // умножаем такое-то количество раз i += 1; until (i > x); if (y = 0) then //выводим, предусмотрев переполнение writeln('слишком большая цыферка') else writeln(y); end. ========================================== int64 - это то же самое, что longint, а uint64 (unsign long int) - длинное число без знака, при правильном использовании позволяет записывать в переменную числа, в 2 раза превышающие максимум int64
Var a: string; begin writeln ('введите день недели с большой буквы'); read (a); if a='понедельник' then writeln ('в этот день 6 уроков'); if a='вторник' then writeln ('в этот день 6 уроков'); if a='среда' then writeln ('в этот день 6 уроков'); if a='четверг' then writeln ('в этот день 6 уроков'); if a='пятница' then writeln ('в этот день 5 уроков'); if a='суббота' then writeln ('в этот день 3 урока'); if a='воскресенье' then writeln ('в этот день уроков нет'); if (a< > 'понедельник') and (a< > 'вторник') and (a< > 'среда') and (a< > 'четверг') and (a< > 'пятница') and (a< > 'суббота') and (a< > 'воскресенье') then writeln ('день недели введен неправильно'); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
rom20081sdf11.04.2020 07:53
-
viktordro9509.08.2021 17:51
-
1972jkmxbr02.10.2020 01:33
-
asovgira25.06.2021 15:32
-
simkinaalinoschka10.11.2021 20:04
-
ари5322.12.2020 11:21
-
ДинаСардина12.05.2021 13:46
-
Губанова123408.06.2023 17:17
-
Gambuker23.07.2021 10:03
-
12345644501.06.2020 07:11
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.