Yuk! Belajar Konsep Pemrograman Di Mesran.Blogspot.Com

Coba Selesaikan Kasus Berikut Ini

Buatlah program untuk menampilkan hasil berikut dengan menggunakan perulangan : 

Input Nilai : 5

Hasil : 1 * 2 * 3 * 4 * 5 = 120

berikut Jawaban Program: 

----------------------------------------------------------------------------------------------------------------------


uses crt;
var
nilai : byte;
i,j : byte;
hasil : integer;
k: char;
begin
clrscr;
write('Input Nilai:');readln(nilai);
for i:= 1 to 5 do
hasil:=1*2*3*4*5;
k:='=';
write('Hasil:1*2*3*4*5',k,hasil );
readln;
end.

tampilan screenshootnya



hasil akhir




Demikilahlah postingan saya  
Nama : Tengku Perdana Putra 
NPM : 12110685

Selamat Belajar Bahasa Pemrograman