Используя средства языка программирование , составить таблицу соответствия больших и малых букв алфавита коду asc||
174
179
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1379 от 21.01.2017 // внимание! если программа не работает, обновите версию! begin var s: ='абвгдеёжзийклмнопрстуфхцчшщъыьэюя'+ 'абвгдеёжзийклмнопрстуфхцчшщъыьэюя'; foreach var c in s do writeln(c,' ',ordansi(c)) end. результат а 192 б 193 в 194 г 195 д 196 е 197 ё 168 ж 198 з 199 и 200 й 201 к 202 л 203 м 204 н 205 о 206 п 207 р 208 с 209 т 210 у 211 ф 212 х 213 ц 214 ч 215 ш 216 щ 217 ъ 218 ы 219 ь 220 э 221 ю 222 я 223 а 224 б 225 в 226 г 227 д 228 е 229 ё 184 ж 230 з 231 и 232 й 233 к 234 л 235 м 236 н 237 о 238 п 239 р 240 с 241 т 242 у 243 ф 244 х 245 ц 246 ч 247 ш 248 щ 249 ъ 250 ы 251 ь 252 э 253 ю 254 я 255
//прога на pascal`е {не работает на pascalabc.net, т.к. оный использует 2-байтную кодировку unicode, а не 1-байтную кодировку ascii, как более ранние версии pascal`ей} const n = 32*2; var ch: array [1..n] of byte; i, num: byte; begin num: =192; for i: =1 to n do begin ch[i]: =num; inc (num); end; writeln ('символ | код ascii'); writeln (''); for i: =1 to n do writeln (' ', chr(ch[i]), ' | ', ch[i]); end. {версия для pascalabc.net} //прога на pascal`е const n = 32*2; var ch: array [1..n] of byte; i, num: byte; begin num: =192; for i: =1 to n do begin ch[i]: =num; inc (num); end; writeln ('символ | код ascii'); writeln (''); for i: =1 to n do writeln (' ', chr(ch[i]+848), ' | ', ch[i]); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
dmitrylazar110.05.2021 20:49
-
56анна214118.05.2020 09:54
-
pika4y206.05.2023 06:04
-
Одиннадцатиклассниц901.12.2021 01:40
-
prosto1242102.11.2021 06:02
-
jaredletoo01.08.2021 08:00
-
rsr19.02.2022 11:42
-
ichmaelz04.08.2022 20:47
-
Daisy1518.11.2022 12:33
-
Vika1551125.09.2022 05:16
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.