Pada kali ini saya akan berbagi bersama kalian pengunjung setia blog saya, yaitu contoh program LOOPING didalam bahasa C dan pascal. silahkan di simak berikut ini semoga bermanfaat.
Tujuan Instruksional Khusus :
Setelah menyelesaikan praktikum ini, Anda diharapkan dapat:
- Membuat perulangan menggunakan perintah FOR
- Membuat perulangan menggunakan perintah WHILE.
- Membuat perulangan menggunakan perintah REPEAT.
Alur Praktikum
Praktikan membuat program dengan bahasa pemrograman yang sesuai pada kasus di Latihan dengan bimbingan Instruktur. Setelah itu, praktikan mengerjakan Tugas Praktikum tanpa bimbingan Instruktur. Tugas Praktikum dikerjakan menggunakan salah satu Bahasa Pemrograman pilihan Praktikan
Latihan
Latihan 3a :
Kode program berikut merupakan contoh perulangan untuk membuat dan menampilkan pencacah (counter) mulai dari 1 sampai 5. Ketik kode program tersebut lalu lakukan kompilasi. Simpan file dengan nama Latihan3a. Buatlah kode program tersebut lalu lalu RUN.
BahasaC
#include <iostream.h> int main(){
int counter = 0; // inisialisasi kondisi while(counter < 5) // tes apakah kondisi masih benar
{
counter++; // tubuh loop
cout << "counter: " << counter << "\n";
}
cout << "Selesai. Counter: " << counter << ".\n"; return 0;
}
Bahasa Pascal
Program Latihan3a; Uses WinCrt;
Var
Counter : Integer;
Begin
while(counter < 5) do begin counter:=counter+1;
writeln('counter: ',counter); end;
writeln('Selesai. Counter: ',counter); End.
Latihan3.b :
Contoh program berikut merupakan contoh perulangan menggunakan WHILE untuk membuat dan menampilkan teks Teknik Informatika FIKOM-UMI sebanyak keinginan pemakai. Ketik kode program tersebut lalu lakukan kompilasi. Simpan file dengan nama Latihan3.b. Buatlah kode program tersebut lalu RUN.
BahasaC
#include <iostream.h> int main(){
int counter;
cout << "Berapa banyak teks Teknik Informatika FIKOM-UMI ? "; cin >> counter;
do {
cout << " Teknik Informatika FIKOM-UMI \n"; counter--;
} while (counter >0 );
cout << "Nilai Counter: " << counter << endl; return 0;
}
Bahasa Pascal
Program Latihan3b; Uses WinCrt;
Var
Counter : Integer; Begin
Write('Berapa banyak teks Teknik Informatika FIKOM-UMI? '); Readln(counter);
while counter>0 do begin
writeln(‘Teknik Informatika FIKOM-UMI '); counter:=counter-1;
end;
writeln('Nilai Counter: ',counter); End.
Latihan3.c :
Kode program berikut merupakan contoh perulangan menggunakan FOR untuk menampilkan teks “Looping!” sebanyak 5 kali. Ketik kode program tersebut lalu lakukan kompilasi. Simpan file dengan nama
Looping.
BahasaC
#include <iostream.h> int main(){
int counter;
for (counter = 0; counter < 5; counter++) cout << "Looping! ";
cout << "\nCounter: " << counter << ".\n"; return 0;
}
Bahasa Pascal
Program Looping; Uses WinCrt; Var
Counter : Integer;
Begin
for counter := 1 to 5 do writeln('Looping!'); writeln('Counter: ',counter);
End.
TUGAS PRAKTIKUM
- Buatlah program untuk menghitung kuadrat bilangan 100 sampai 200 (ALL).
- Buatlah program menggunakan while untuk menghitung factorial bilangan.
- Buatlah program untuk menampilkan bilangan prima antara 0 sampai dengan 100.
- Buatlah program untuk menampilkan deret Fibonacci yang sesuai dengan angka yang hendak dijumlahkan.
teman-teman harus kerja tugas praktikumnya ya agar lebih cepat mahir sekian dan terima kasih
