PROCEDURE
Procedure ialah bagian program yang berisikan serangkaian langkah-langkah tertentu, jika ingin mengubah bagian program menjadi beberapa procedure, maka setiap bagian dalam program tersebut diubah menjadi sebuah procedure.
procedure kali.
Var
A.B:Byte
begin
Write('Isi nilainya:'), Readln(A);
B:=A*A;
End;
A:=3
Begin
kali;
writeln('nilai B=',B);
end.
Tidak ada komentar:
Posting Komentar