Bahasa pascal merupakan bahasa pemrograman yang saat ini digunakan sebagai soal dalam Olimpiade Komputer. Dalam soal tersebut terdapat beberapa soal mengenai logika, matematika dan juga algoritma pascal. Mungkin bagi orang yang baru pertama kali melihat soal Olimpiade Komputer mereka tidak kesulitan untuk mengerjakan soal logika dan matematikanya. Namun bagaimana ketika memasuki soal algoritma?
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.
ayo kita belajar tentang pascal silahkan download aja link ebook dan pascalnya silahkan download mangga
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.
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.
ayo kita belajar tentang pascal silahkan download aja link ebook dan pascalnya silahkan download mangga
Tidak ada komentar:
Posting Komentar