1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Миклашевский Денис |
20.03.2008 9:24
Сообщение
#1
|
|
Гость |
Доброго времени суток! Если кто может помогите с задачкой...:
Написать рекурсивную процедуру, которая считывает вводимые с клавиатуры числа до тех пор, пока не будет обнаружен 0.Затем введенные числа распечатываются в обратном порядке.0 Не печатать. спасибо заранее! |
![]() ![]() |
| sintanial |
21.03.2008 22:22
Сообщение
#2
|
|
Пионер ![]() ![]() Группа: Пользователи Сообщений: 70 Пол: Мужской Реальное имя: Мартын Репутация: 1 |
Уже появились вопросы =)
const a: array of real выбивает ошибку =( пишет типа ожидался символ "[", тогда я поставил размер [1..100] и он опять выдает ошибку Вот эту фразу не хочет читать потому как при вызове функциии вот здесь ругается mat(a[1], n - 1, sum) пишет "Нельзя приобразовать выражение типа real к выражению типа array[1..100] of real - воть так вот =( И еще volvo наш учитель почему то не разрешает пользоваться "exit" говорит что должны учиться делать без неё так как это типа делает программиста более не опытным если ей пользуешься =(. Это не к кому конечно же тута не относится- просто мнение нашего учителя =). (хотя какой там из меня опытный программист =) ). А вот без exit я вот уже час думаю как сделать =) З.ы. Может ошибка выбивает из за того что я работаю на Pascal ABC( нам пока на других запрещают работать ) ? а не на Turbo Pascal =) |
Миклашевский Денис Рекурсия 20.03.2008 9:24
spill
Procedure ReadInt;
Var
X: Integer;
Begin
Read... 20.03.2008 12:22
Гость А можно для "тупых" с телом программы :)... 20.03.2008 21:27
klem4 begin ReadInt end. 20.03.2008 21:32
vRs В люом случае, это ведь не рекурсия... 21.03.2008 12:28
volvo Ну да, конечно... Только ReadInt сама себя вызывае... 21.03.2008 12:45
Michael_Rybak
Действительно. Это не рекурсия. Это рекурсивная ... 21.03.2008 14:10
sintanial Не хотел создавать новую тему, так что спрошу тута... 21.03.2008 20:07
volvo Для начала вынеси собственно решение в отдельную п... 21.03.2008 20:16
sintanial ну воть
Забыл сказать, что нельзя использовать ци... 21.03.2008 20:40
sintanial Вот написал но оно не пашет =). Пишет ошибку ти... 21.03.2008 21:47
volvo В принципе, рекурсия и будет заменять цикл...
Смо... 21.03.2008 21:58
sintanial Спасибо огромное, щас буду разбираться что да как ... 21.03.2008 22:01
andriano И еще volvo наш учитель почему то не разрешает пол... 21.03.2008 22:55
volvo Да не выбивает оно ничего (если ты используешь TP,... 21.03.2008 23:01
sintanial Ясно =). Спасибо огромное. А на счет ABC - просто ... 21.03.2008 23:22
volvo PascalABC workaround:
type arrtype = array[1 .. 10... 21.03.2008 23:22![]() ![]() |
|
Текстовая версия | 8.12.2025 17:46 |