program latihan;
uses crt;
var
UmurKu : Byte;
Keterangan : String;
begin
clrscr;
Write('Berapa umur anda ? ');
Readln(UmurKu);
Write('Komentar anda: ');
Readln(Keterangan);
Writeln('Saya berumur ',UmurKu,' tahun');
Writeln(Keterangan);
end.
Bagaimana mudah sekali khan….
jika ada kritik,saran ,maupun pertanyaan saya dengan senang hati menerimanya, seandainya tidak merepotkan silahkan lampirkan komentar anda demi kemajuan blog ini.
Salam hangat.
Terima Kasih.
No comments:
Post a Comment