Ответ: Procedure and Function
Посмотри чей-нибудь код
Кратко-
1) в процедуру можно ничего не передавать. Пример - repaint;
2) Можно передать DrawText(s,x,y) несколько чисел (x,y), строк (s) или свой тип данных - запись.
3) функции - то же самое, но они имеют тип и их значение надо присваивать чему-нибудь
H:=GetHeight;
a:=sqr(b);
В MP нельзя написать procedure X(a:integer;var b:integer); - можно передавать только значения procedure X(a,b:integer);
Если хочется внутри процедуры изменить переменную - либо делать её глобальной или сделать тип данных - запись:
type Point=record x,y:integer; end; ...
procedure X(P:point);
begin
p.x:=p.y+p.x;
P.y:=P.x-p.y;
end;
__________________
О¯О ¡¡¡ʁɔvʎнdǝʚǝdǝu dиW
|