Page 21 - Microsoft Word - Modul pgds perulangan
P. 21
Modul Pemrograman Dasar Kelas X
C. Assesment Diagnostik
1. Tulislah program berikut :
program struktur_if_else_if_else;
uses crt;
var
nilai : integer;
begin
clrscr;
writeln('Masukkan nilai : '); readLn(nilai);
If (nilai >75) then
begin
writeln('Siswa naik kelas');
end
ELSE
begin
writeln('Siswa tidak naik kelas);
end;
If (nilai >60) then
begin
writeln('Siswa lulus');
end
ELSE
begin
writeln('Siswa tidak lulus');
end;
Bagaimana hasil running dari program tersebut ?
…………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………
2. Buatlah program percabangan if … else if… else untuk memeriksa apakah sebuah
angka termasuk bilangan genap atau ganjil dengan mod (sisa bagi) dan
memeriksa apakah bilangan tersebut lebih dari sepuluh atau kurang dari sepuluh
dengan tanda (> , <).
…………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………….
3. Buatlah program percabangan if … else if… else untuk memeriksa apakah sebuah
angka termasuk bilangan positif atau negatif dengan menggunakan bilangan >0,
dan memeriksa apakah bilangan tersebut merupakan bilangan genap atau ganjil
dengan menggunkan mod ( sisa bagi )
…………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………….
SMK Antartika 2 Sidoarjo, Dinas Pendidikan Provinsi JawaTimur 2020 15