Как зделать чтобы функция или процедура возвращала несколько значений через свои
переменные.
Процедуры и функции |
1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!
Процедуры и функции |
Bokul |
Сообщение
#1
|
Гуру Группа: Пользователи Сообщений: 1 117 Пол: Мужской Реальное имя: Богдан Репутация: 11 |
Как зделать чтобы функция или процедура возвращала несколько значений через свои
переменные. -------------------- Лао-Цзы :
Знать много и не выставлять себя знающим есть нравственная высота. Знать мало и выставлять себя знающим есть болезнь. Только понимая эту болезнь, мы можем избавиться от нее. |
GoodWind |
Сообщение
#2
|
Автооответчик Группа: Пользователи Сообщений: 1 188 Пол: Мужской Реальное имя: Александр Репутация: 16 |
обьяви эти параметры как переменные:
Код function abcd(var a,b:integer):integer; теперь внутри функции/процедуры можешь менять значение переменных a и b -------------------- Неадекватная чушь может быть адекватным ответом на неадекватный вопрос. Понятно или разжевать?
|
Bokul |
Сообщение
#3
|
Гуру Группа: Пользователи Сообщений: 1 117 Пол: Мужской Реальное имя: Богдан Репутация: 11 |
нет, я хочу чтобы функция/процедура не опирирувала ее переменными, а
возвращала ответ через них. Код procedure ddd(a,b:byte); begin a:=3; b:=4; end; var a,b:byte; begin ddd(a,b); writeln('a = ',a); write('b = ',b); readln; end. А так не выходит... Сообщение отредактировано: GoodWind - -------------------- Лао-Цзы :
Знать много и не выставлять себя знающим есть нравственная высота. Знать мало и выставлять себя знающим есть болезнь. Только понимая эту болезнь, мы можем избавиться от нее. |
volvo |
Сообщение
#4
|
Гость |
Тебе же сказали, Var добавь !!!
procedure ddd(var a, b: byte); |
Bokul |
Сообщение
#5
|
Гуру Группа: Пользователи Сообщений: 1 117 Пол: Мужской Реальное имя: Богдан Репутация: 11 |
Аааа..... я первый раз не заметил
Спасибо -------------------- Лао-Цзы :
Знать много и не выставлять себя знающим есть нравственная высота. Знать мало и выставлять себя знающим есть болезнь. Только понимая эту болезнь, мы можем избавиться от нее. |
Текстовая версия | 24.04.2024 8:10 |