Without Parameters
Program UsingProc;
uses wincrt;
procedure hello;
var
name : string;
begin
name := 'lady gaga';
writeln(name);
end;
begin
hello;
end.With Parameters:
Program UsingProcParam;
uses wincrt;
procedure hello(name : integer);
begin
writeln(name);
end;
begin
hello('lady gaga');
end.
klik di sini
ReplyDelete