String6. дан символ c, изображающий цифру или букву (латинскую или рус- скую). если c изображает цифру, то вывести строку «digit», если латин- скую букву — вывести строку «lat», если — вывести строку «rus». в паскале не могу сделать
113
304
Ответы на вопрос:
Var c: char; begin write('введите символ: '); readln(c); case c of '0'..'9' : writeln('digit'); 'a'..'z','a'..'z': writeln('lat'); 'а'..'я','а'..'я': writeln('rus'); else writeln('другой символ'); end; end. пример: введите символ: п rus
// freepascal 3.0.0 program string6; var i: integer; f: boolean; r: array[1..33] of widechar = ('а', 'б', 'в', 'г', 'д', 'е', 'ё', 'ж', 'з', 'и', 'й', 'к', 'л', 'м', 'н', 'о', 'п', 'р', 'с', 'т', 'у', 'ф', 'х', 'ц', 'ч', 'ш', 'щ', 'ь', 'ы', 'ъ', 'э', 'ю', 'я'); c: widechar; begin f : = false; readln(c); if isnumber(c) begin writeln('digit'); f : = true; end else for i : = 1 to 33 do if r[i] = c then begin writeln('rus'); f : = true; break; end; if not(f) then writeln('lat'); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
KKIUY10.07.2022 12:36
-
leesasha08308.05.2023 14:28
-
ilyaneizvestno1011.07.2022 14:59
-
Спроситель513.02.2022 21:56
-
полина193826.02.2021 11:28
-
zentronys02.03.2020 23:19
-
svetaabc20.09.2020 11:25
-
R010KMB21.01.2020 06:34
-
InnaGlazova31.12.2022 12:21
-
морж1411.06.2023 12:31
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.