Bahasa pascal merupakan bahasa pemrograman yang saat ini digunakan sebagai soal dalam Olimpiade Komputer. Dalam soal tersebut terdapat bebe...
Berikut merupakan salah satu contoh soal algoritma :
procedure panjang (p: integer);
var
z : array[0..9] of integer;
a, b, c, d : integer;
x : integer;
begin
for a:= 0 to 9 do
case (a mod 5) of
0 : z[a] := 3;
1 : z[a] := 1;
2 : z[a] := 4;
3 : z[a] := 2;
4 : z[a] := 0;
end;
for b:= 9 downto 0 do begin
x:= 3*z[b];
z[b]:= a - b;
end;
for c:= 0 to 9 do
if (c mod 2 = 0) then
z[c]:= z[c] + 5;
for d:= 9 downto 0 do
if (z[d] < 0) then
z[d] := z[d] * -1;
writeln(z[p]);
end;
Apakah keluaran yang dihasilkan algoritma di atas dalam pemanggilan panjang(9)?
(A) 8
(B) 6
(C) 4
(D) 2
(E) 0
Contoh di atas adalah contoh soal Olimpiade Komputer tingkat Propinsi tahun 2007. Soal tersebut merupakan salah satu tipe soal yang akan kita temukan dalam soal Olimpiade Komputer. Namun jika kita telah masuk ke tingkat Nasional, kita akan dituntut untuk bisa membuat suatu program dengan menggunakan pascal.
Di sini saya hanya memberi sedikit gambaran mengenai ebook yang akan saya berikan. Ebook ini saya dapatkan dari Tim Pembina TOKI. Ebook ini terdiri dari tiga buku, untuk siswa, untuk guru dan siswa, serta untuk guru. Mencakup mengenai referensi pemrograman bahasa pascal, konsep dasar pascal dan aspek pedagigi pengajaran pemrograman pertama. Mudah-mudahan ebook ini dapat berguna bagi kalian yang ingin belajar mengenai bahasa pemrograman pascal.
procedure panjang (p: integer);
var
z : array[0..9] of integer;
a, b, c, d : integer;
x : integer;
begin
for a:= 0 to 9 do
case (a mod 5) of
0 : z[a] := 3;
1 : z[a] := 1;
2 : z[a] := 4;
3 : z[a] := 2;
4 : z[a] := 0;
end;
for b:= 9 downto 0 do begin
x:= 3*z[b];
z[b]:= a - b;
end;
for c:= 0 to 9 do
if (c mod 2 = 0) then
z[c]:= z[c] + 5;
for d:= 9 downto 0 do
if (z[d] < 0) then
z[d] := z[d] * -1;
writeln(z[p]);
end;
Apakah keluaran yang dihasilkan algoritma di atas dalam pemanggilan panjang(9)?
(A) 8
(B) 6
(C) 4
(D) 2
(E) 0
Contoh di atas adalah contoh soal Olimpiade Komputer tingkat Propinsi tahun 2007. Soal tersebut merupakan salah satu tipe soal yang akan kita temukan dalam soal Olimpiade Komputer. Namun jika kita telah masuk ke tingkat Nasional, kita akan dituntut untuk bisa membuat suatu program dengan menggunakan pascal.
Di sini saya hanya memberi sedikit gambaran mengenai ebook yang akan saya berikan. Ebook ini saya dapatkan dari Tim Pembina TOKI. Ebook ini terdiri dari tiga buku, untuk siswa, untuk guru dan siswa, serta untuk guru. Mencakup mengenai referensi pemrograman bahasa pascal, konsep dasar pascal dan aspek pedagigi pengajaran pemrograman pertama. Mudah-mudahan ebook ini dapat berguna bagi kalian yang ingin belajar mengenai bahasa pemrograman pascal.
- Download Buku Pascal 1
- Download Buku Pascal 2
- Download Buku Pascal 3
- Download Buku Pascal 4
- Download Buku Pascal 5
Bagi kalian yang belum memiliki Free Pascal, kalian bisa kalian bisa mendownloadnya langsung di website TOKI, di sini. Atau kalian bisa langsung mendownloadnya langsung file tersebut di bawah ini.
