My site

Site menu
Section categories
Ilmu Komputer [3]
Kajian Islami [31]
Statistics

Total online: 1
Guests: 1
Users: 0
Main » Files » Article » Ilmu Komputer

Turbo Pascal
2009-10-14, 3:44 PM
Uses WinCrt;

Var
   Nama: String [20];
   Umur: Byte;

Begin 
      Write(' Ketik Nama: ' ); Read (Nama);
      Write(' Ketik Umur: '); Read (Umur);
      Writeln;
      Writeln('Nama : ',Nama);
      Writeln('Umur : ',Umur);
End.
Category: Ilmu Komputer | Added by: YahyaOteda
Views: 457 | Downloads: 0 | Rating: 0.0/0
Total comments: 0
Name *:
Email *:
Code *:
Search
Site friends
  • Create your own site
  • Tag Board

    Copyright MyCorp © 2024