FAKULTAS TEKNOLOGI INFORMASI DAN KOMUNIKASI
Selamat Datang di Forum FTIKOM.

"Information & Communication Technology Faculty"
"UNIVERSITAS MULAWARMAN"


Daftarkan Diri Anda. Selamat Berposting.
Ramekan Forum kita guna memajukan Fakultas kita.

Best Regard

Soal Quiz Algoritma

Topik sebelumnya Topik selanjutnya Go down

Soal Quiz Algoritma

Post  novay on Fri Dec 10, 2010 12:45 am

Nih Soalnya Bray...


"Soal Quiz":

1. Perhatikan program Pascal berikut :
1: Uses crt;
2: Var i, angka : integer;
3:
4: Begin
5: Clrscr;
6:
7: angka:=20;
8:
9: For i:=1 to angka do
10: Begin
11: If (i mod 4=0) then
12: Write(‘*’)
13: Else
14: Write(i);
15: End;
16:
17: Readln;
18: End.

(a) Apa output program di atas?
(b) Jika baris program ke-11 diganti dengan If(i mod 4=0)OR(i mod 5=0) then,
maka apa output program?

2. Buatlah sebuah deret matematika sampai digit 50 seperti berikut :
1 2 3 * 6 7 * 9 11 * 13 14 * 17 18 19 @ 21 22 23 * 26 27 * 29 dst…..
Keterangan :
Simbol * untuk semua bilangan dengan kelipatan 4
Simbol untuk semua bilangan dengan kelipatan 5
Simbol @ untuk semua bilangan dengan kelipatan 4 DAN 5

_________________________________________________
_________________________________________________
"Use incredible thoughts to manifest an incredible life. Your life will follow your thoughts.
If you think it, and believe it, then you will see it."


Keep Posting BRAYY...

PHOTO PANAS:


Sexy Kannnn???....
Jgn Pikiran Kotor Dulu Brayy...

novay
Forum Founder [Joker]
Forum Founder [Joker]

Posts : 488
Points : 840
Reputasi : 12
Age : 25
Location : Berau City
Universitas : University Of Mulawarman
Fakultas : Faculty Of Information and Communication Technology

http://ftikom-unmul.nstars.org

Kembali Ke Atas Go down

Topik sebelumnya Topik selanjutnya Kembali Ke Atas

- Similar topics

 
Permissions in this forum:
Anda tidak dapat menjawab topik