1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| tigrа |
Сообщение
#1
|
|
Гость |
Помогите задачу решить,пожалуйста. Читается ли введенное целое число,имеющее 2 и более знаков одинаково справа на лево и слева на право?
|
![]() ![]() |
| Altair |
Сообщение
#2
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Цитата через crt, а он у меня чего-то не поддерживается. Он у Вас (можно на "ты" перейти? ) не пропаченный. Там возникает ошибка деления на 0. Цитата Нет, я из дома Офигеть! Все данные говорят, что Ваш дом в США. Ох уж эти IP -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
tigrа симметричная строка 1.10.2004 0:10
APAL Подобная задача уже рассматривалась в этом разделе… 1.10.2004 0:13
APAL Вот на скорую руку сваял...
Var St : String;
… 1.10.2004 0:17
tigra Спасибо большое, все работает Вот только выдержк… 1.10.2004 22:48
GoodWind в конце программы
поставить... перед
конечно … 2.10.2004 1:27
Altair Uses CRT;
Var St : String;
i : Byte;
Begin… 2.10.2004 10:19
APAL Или просто нажать Alt+F5 по окончанию работы... :… 2.10.2004 15:55
Altair Именно.
tigra, а вы заходили в инет из интернет … 2.10.2004 18:36
tigra Сплошной offtop:
Нет, я из дома. Про то что до E… 3.10.2004 0:24
tigra ДА ! это можно сделать как то так:
repeat
… 3.10.2004 0:30
GoodWind правильно
repeat
until keypressed; 3.10.2004 8:59
APAL Тогда заменить Repeat-Until на Readln; 3.10.2004 13:47
GoodWind
ну ето на нажатие enter, а если юзверь будет нажи… 3.10.2004 19:57
tigra Ну вот теперь все нормал, спасибо! :)
да,коне… 4.10.2004 0:17![]() ![]() |
|
Текстовая версия | 18.02.2026 19:50 |