Merhaba arkadaşlar pascal procedure yapısını biraz anlatmaya çalısıcam umarım faydalı olur.
Procedure Nedir Ne İşe Yarar ?
prosedürler bir işi birden fazla kez yapıcağımız zamanlarda kullanırız örneğin toplama işlemini birçok yerde farklı sekıllerde kullanıcaksak şu şekilde yaparız.
fonksiyondan farkı kendisinden direk bir değer dönmez.
Kod:
uses crt;
var
x,y,z:integer;
procedure topla(sayi1,sayi2:integer);
begin
z:=sayi1+sayi2;
end;
begin
writeln('1.sayıyı girin :');readln(x);
writeln('2.sayıyı girin :');readln(y);
topla(x,y);
writeln(z);readln;
end.
buradaki topla prosedürünü istediğiniz kadar kullanabilirsiniz.gönderdiğiniz değerleri toplayıp z değişkenine atıyacaktır.. Kolay gelsin..
12-18-2010, 23:51
Turbo pascal procedure kullanımı 
Benzer Konular 
Normal
