Friday, March 30, 2012

Turbo Pascal

Minggu pertama (14 Maret 2012)


1.  Apa yang anda ketahui tentang kondisi pascal ?
2.  Tuliskan bentuk umum kondisi pada pascal ?
3.  Buatlah contoh program sederhana pascal ?

Jawaban
1.  Kondisi pada pascal adalah kondisi yang digunakan untuk mengatur suatu program dengan memberikan statement, jika syarat terpenuhi maka program akan berlanjut.

2.  If Kondisi Then
Statement 1
Else
Statement 2

3.  Uses crt;
Var  a,b:Integer;
Begin
Clrscr;
Write(‘a=’), read(a);
Writeln;
Writeln(‘Nilai b=x+3’);
y:=x+3;
Write(‘y=’,y);
Read(x);
End.

1.Koding
Uses crt;
Begin
Clrscr;
Writeln(‘Selamat Datang di LAB SI’);
Readln;
End.

Output
Selamat Datang di LAB SI


2.Koding:
Uses crt;
Var nm,npm,kls:string;
Begin
Clrscr;
Write(‘Masukkan Nama:’); readln(nm);
Write(‘Masukkan NPM:’); readln(NPM);
Write(‘Masukkan Kelas:’); readln(kls);
Writeln(‘Nama Saya’,nm, ‘dengan NPM’,npm,’Berada di Kelas’,kls);
Readln;
End.

Output:
Masukkan Nama:
Masukkan NPM:
Masukkan Kelas:
Nama Saya(inputan)dengan NPM(inputan)Berada di Kelas(inputan)


3. Koding:
Uses crt;
Var nilai:Integer;
Begin
Clrscr;
Writeln(‘Masukkan Nilai:’);
Readln(Nilai);
If Nilai >70 Then
Write(‘Lulus’);
Else
Write(‘Gagal’);
Readln;
End.

Output:
Masukkan Nilai:

No comments:

Post a Comment

Welcome to My Blog.
I'm a SonElf, Love with Super Junior & SNSD also love YoonHae (Yoona & Donghae).
Thank's for visited my blog and don't be a Silent Reader's guys. Give your comment for my blog.
Thank You ^^