Main
|
Registration
|
Login
|
RSS
My site
Site menu
Home page
Site info
File Catalog
Publisher
Blog
Forum
Photo Albums
Guestbook
Contact Us
FAQ
Site Catalog
Tests
Ad Board
Online games
Informasi
Mr.Oteda.Net
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.
1
2
3
4
5
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
Only authorized users can post messages
Copyright MyCorp © 2024