Translate

Kamis, 06 Juni 2013

Yuk! Belajar Konsep Pemrograman Di Mesran.Blogspot.com

Selesaikanlah Kasus Berikut :
Buatlah program untuk menampilkan hasil berikut dengan menggunakan perulangan :


Inputkan nilai : 5
Hasil : 1*2*3*4*5 = 120
Menggunakan Program pascal

Berikut Jawaban Program :

Uses wincrt;
Var i,x,n:integer;
Begin
Write('INPUTKAN NILAI : ');Readln(n);
For i:= 1 to n do
Begin
x:=(x*i);
if (i=1) then
write(i)
else
write('*',i);
end;
Writeln(' = ',x);
end.

Demikilahlah postingan saya,  Nama : HARI YUDI  NPM : 12110074
Selamat Belajar Bahasa Pemrograman

Tidak ada komentar:

Posting Komentar