program deret angka;
uses wincrt;
var i,j,n:integer;
begin
readln(n);
for i:=1 to n do
begin
for j:=1 to i do
write (j);
writeln;
end;
end.
Jangan berhenti berupaya ketika menemui kegagalan. Karena kegagalan adalah cara Tuhan mengajari kita tentang arti kesungguhan.
Sabtu, 10 Desember 2011
Langganan:
Posting Komentar (Atom)
ASMAUL HUSNA
About Me
- PRANI NISKALA PRATIWI
- Saya adalah mahasiswa baru di Institut Teknologi Sepuluh Nopember, di jurusan Statistika. Saya berasal dari kota Tahu. Namun saya lahir di Pulau Ujung Timur dari negara Indonesia.
0 komentar:
Posting Komentar