Sabtu, 17 Desember 2011

Program Menghitung Umur dalam Bahasa Pascal

program belajar;
uses wincrt;
var nama : char;
umur, TL:integer;
begin
writeln ('masukkan nama:');readln(nama);
writeln('masukkan Tahun Lahir:');readln(TL) ;
umur:=2011-TL;
writeln(umur);
end.

Hasil:
Diposting oleh di

2 komentar:

  1. ALT30 Desember 2011 pukul 07.09

    Sudah bagus, alangkah baiknya lagi kalau screenshotnya di tampilkan semua stepnya dari awal sampai akhir... hehe, :D
    Lanjutkan... :)

    BalasHapus
  2. Privacy is Mine2 Januari 2012 pukul 16.18

    Oke, thank you buat sarannya :)

    BalasHapus

Langganan: Posting Komentar (Atom)