На языке программирования паскаль составить программу перевода из десятичной системы счисления в систему счисления с основанием х, где х - целое число, определяемое по такому правилу: если 2-я буква фамилии учащегося находится в интервале от а до д, то х = 9; если 2-я буква фамилии учащегося находится в интервале от е до к, то х = 8; если 2-я буква фамилии учащегося находится в интервале от л до р, то х = 7; если 2-я буква фамилии учащегося находится в интервале от с до ц, то х = 6; если 2-я буква фамилии учащегося находится в интервале от ч до я, то х = 5.
239
356
Ответы на вопрос:
var a: string; x: integer; begin write('введите слово: '); readln(a); length(a); if (a[2]='а') or (a[2]='б') or (a[2]='в') or (a[2]='г') or (a[2]='д') then x: =9; if (a[2]='е') or (a[2]='ж') or (a[2]='з') or (a[2]='и') or (a[2]='й') or (a[2]='к') then x: =8; if (a[2]='л') or (a[2]='м') or (a[2]='н') or (a[2]='о') or (a[2]='п') or (a[2]='р') then x: =7; if (a[2]='с') or (a[2]='т') or (a[2]='у') or (a[2]='ф') or (a[2]='х') or (a[2]='ц') then x: =6; if (a[2]='ч') or (a[2]='ш') or (a[2]='щ') or (a[2]='ы') or (a[2]='ъ') or (a[2]='ь') or (a[2]='э') or (a[2]='ю') or (a[2]='я') then x: =5; writeln('перевод: ', x); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Duma1029.03.2023 11:29
-
сончикпоня1501.03.2022 15:23
-
Неня200314.10.2020 01:20
-
avrorasergeev02.08.2022 23:08
-
Лизочка259728.05.2023 07:24
-
danikpro20020120.11.2021 15:39
-
KriStiNaTim0305.02.2021 07:41
-
Esken21314122.05.2021 08:01
-
eldar621322.08.2021 04:29
-
Няшня19.03.2023 16:49
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.