uses wincrt;
var num,total,x:integer;
begin
num:=1;
total:=0;
write('masukkan nilai=');readln(x);
writeln;
repeat
if num
Langganan:
Posting Komentar (Atom)
Mengenai Saya
- It's My Life
- all about me.............. ehmmm.............. Q bukan orang yang sempurna, tapi Q cukup istimewa buat orang tuaQ, kluargaQ,dll... Tapi Q selalu ingin menjadi orang yang setiap orang yang Q kenal tidak akan menyesal telah mengenal Q.amin...
Tidak ada komentar:
Posting Komentar