Page 16 - Microsoft Word - Modul pgds perulangan
P. 16
Modul Pemrograman Dasar Kelas X
C. Assesment Diagnostik
1. Tulias program berikut :
program struktur_if_then_else;
uses crt;
var
angka: integer;
begin
clrscr;
writeln(‘Masukkan bilangan : ‘); readln (bilangan);
if (angka > 10) then
begin
writeln( ‘bilangan lebih besar dari sepuluh');
end
else
begin
writeln('bilangan kurang dari sepuluh');
end;
readln;
end.
Bagaimana hasil running dari program tersebut ?
…………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………
2. Buatlah program percabangan if … then else untuk memeriksa apakah sebuah
angka termasuk bilangan genap atau tidak dengan menggunakan mod (sisa bagi),
jika dibagi 2 (sisanya 0), artinya angka tersebut merupakan bilangan genap.
Selain itu, pasti angka ganjil, sehingga yang akan dijalankan program yang lain
…………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………….
3. Buatlah program percabangan if … then else untuk memeriksa apakah sebuah
angka termasuk bilangan positif atau tidak dengan menggunakan bilangan >0,
jika bilangan lebih dari 0, artinya angka tersebut merupakan bilangan positif.
Selain itu, pasti angka negatif, sehingga yang akan dijalankan program yang lain
…………………………………………………………………………………………………………………………
…………………………………………………………………………………………………………………………
………………………………………………………………………………………………………………………….
SMK Antartika 2 Sidoarjo, Dinas Pendidikan Provinsi JawaTimur 2020 10