andrypein.net : Materi postingan kedepan akan penuh dengan pascal, sekarang tentang membuat persegi empat dengan pascal.
Untuk post ini bagian pertama dulu karena ada bagian keduanya dud, h3h3.
Ane tes di ideone (compiler online GG), boleh dicoba masih aktif situsnya.
Beginilah kode cara membuat persegi empat dengan pascal gan :
write('masukkan angka yang anda inginkan = '); readln(a);
for b:= 1 to a do
begin
for c := 1 to a do
begin
if((b=1) or (b=a) or (c=1) or (c=a)) then
write('*')
else
write(' ');
end;
writeln;
end;
readln;
Silahkan cek ideone buatan punya ane disini gan.
