Буквы русского алфавита |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Буквы русского алфавита |
Света |
Сообщение
#1
|
Гость |
Помогите еще раз, будьте так любезны!
Составить программу, выводящую на экран буквы русского алфавита от А до З в столбец. Для решения задачи нужно использовать тип Char. |
volvo |
Сообщение
#2
|
Гость |
Света
Код var i: char; begin for i := 'A' to 'З' do writeln(i:5); end. К сожалению, проверить не могу... Сообщение отредактировано: volvo - |
klem4 |
Сообщение
#3
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
2volvo зачем i:5 у вас ?
Код program pp; uses crt; var ch:char; Begin clrscr; for ch:='А' to 'З' do writeln(ch); readln; end. -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
volvo |
Сообщение
#4
|
Гость |
klem4
Привычка такая - всегда форматировать вывод (тем более, так создается впечатление, что символы действительно печатаются в столбец - с отступом от края экрана, и чтобу увеличить отступ достаточно просто увеличить число...). Но можно и без этого. Дело привычки. А можно встречный вопрос? Зачем вот это? Код program pp; Сообщение отредактировано: volvo - |
klem4 |
Сообщение
#5
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
)
чесно говоря не знаю что ответить)) будем считать, что опечатка :D -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
suriv |
Сообщение
#6
|
Бывалый Группа: Пользователи Сообщений: 234 Пол: Мужской Реальное имя: AHTOH Репутация: 1 |
Код program pp Можно и не писать вообще(Сам недавно узнал); :p2: suriv offtop Ты очень сильно ошибаешься, думая, что заголовок Program не несет никакой нагрузки... Но это не относится к обсуждению вопроса... /offtop |
Текстовая версия | 11.01.2025 22:35 |