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