Pengaturan

Gambar

Lainnya

Tentang KASKUS

Pusat Bantuan

Hubungi Kami

KASKUS Plus

© 2024 KASKUS, PT Darta Media Indonesia. All rights reserved

DarknessTalicAvatar border
TS
DarknessTalic
Daftar Soal Algoritma Pemrograman (ALPRO)
nona212
nona212 memberi reputasi
1
217.3K
3.3K
GuestAvatar border
Guest
Tulis komentar menarik atau mention replykgpt untuk ngobrol seru
Mari bergabung, dapatkan informasi dan teman baru!
Programmer Forum
Programmer ForumKASKUS Official
20.2KThread4.3KAnggota
Tampilkan semua post
xoriuzAvatar border
xoriuz
#67
ane coba jawab gan


soal 2:
Code:
*
***
*****
***
*


Code:


jawab
[code]
for i<-1 to n do
\tif i<= n div 2 + 1 then
\t\tnspacedepan = n div 2 - i + 1
\t\tnbintang = i * 2 - 1
\telse
\t\tnspacedepan = i - n div 2 - 1
\t\tnbintang = (n - i) * 2 + 1
\tendif
\t
\tfor j<-1 to nspacedepan do
\t\twrite(" ");
\tendfor
\t
\tfor j<-1 to nbintang do
\t\twrite("*");
\tendfor
\t
\twriteln();
endfor



soal 1:
Code:
*
* *
* *
* *
*


jawab
Code:

for i<-1 to n do
\tif i<= n div 2 + 1 then
\t\tnspacedepan = n div 2 - i + 1
\t\tnbintang = i * 2 - 1
\telse
\t\tnspacedepan = i - n div 2 - 1
\t\tnbintang = (n - i) * 2 + 1
\tendif
\t
\tfor j<-1 to nspacedepan do
\t\twrite(" ");
\tendfor
\t
\tfor j<-1 to nbintang do
\t\tif j = 1 or j=nbintang then
\t\t\twrite("*");
\t\telse
\t\t\twrite(" ");
\t\tendif
\tendfor
\t
\twriteln();
endfor


CMIIW emoticon-Big Grin
0
Ikuti KASKUS di
© 2023 KASKUS, PT Darta Media Indonesia. All rights reserved.