Sesuai dengan pertanyaan mas/mbak takirey tentang bagaimana menyimpan bilangan genap ke dalam suatu array sebanyak input user.
Selamat Mencoba!!
First Of Solution
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
| uses wincrt;
var genap : array[1..100] of integer;
a, b, jum : integer;
begin
a := 0;
b := 2;
write('Jumlah bilangan genap : ');readln(jum);
while a <> jum do begin
inc(a);
genap[a] := b;
b := b + 2;
end;
writeln;
writeln('Hasil yang disimpan di array : ');
for b := 1 to jum do
writeln('Bilangan genap ke-',b,' : ',genap[b]);
end. |
| A[1] | A[2] | A[3] | A[4] | A[5] | A[6] | A[7] | A[8] | A[9] | A[10] |
| 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 |
| 10 | 20 | 30 | 40 | 50 | 60 | 70 | 80 | 90 | 100 |
Postingan kali ini Daeng Admin membahas tentang bagaimana Cara Membuat atau Memasang Buku Tamu Menjadi Melayang. Membuat buku tamu ini sangat penting karena di situlah para blogger maupun netter bisa saling menyapa dan memberikan pendapatnya mengenai blog kita. Namun salah satu yang bikin masalah yaitu mencari peletakanya. Kadang para blogger binggung memasangnya dimana. Nah kalo masalah itu ada solusinya yaitu memasang Buku tamu yang melayang. Maka dari itu sebelum memasang ini harus diperhitungkan juga masalah kecepatanya. fitur buku tamu ini sangat disarankan untuk dipasang. Hal ini dikarenakan dengan adanya buku tamu, anda menjadi tahu siapa saja yang sudah berkunjung di blog anda. Dan tidak hanya itu buku tamu bisa berfungsi sebagai chatting antar pemilik blog dengan pengunjung. | Menu Turbo Pascal Turbo Pascal memiliki 7 buah menu utama yang terdiri dari : File, Edit, Run, Compile, Options, Debug, dan Break / Watch. Untuk memilih salah satu dari menu itu anda bisa menekan tombol Alt + F (untuk memanggil menu file), atau menekan Alt + [huruf pertama dari menu]. |