14 October 2011

TUGAS ALGORITMA 1

FUNGSI LOGIKA IF
Satu inputan yang memiliki lebih dari satu jawaban pilihan
Contoh :

program if_1;
uses wincrt;
var
  nilai : integer;
begin
  write('Masukkan nilai :');readln(nilai);
  if nilai >= 70 then Writeln('Lulus')
  else Writeln('Tidak Lulus');
end.

program if_2;
uses wincrt;
var
  nilai : integer;
begin
  write('Masukkan nilai :');readln(nilai);
  if (nilai >= 70) and (nilai<=70) then Writeln('Lulus')
  else Writeln('Tidak Lulus');
end.

program if_3;
uses wincrt;
var
  nilai : integer;
begin
  write('Masukkan nilai :');readln(nilai);
  if nilai >= 70 then
  Begin
    Writeln('Lulus');
    Writeln('Selamat');
  end
  else
  Begin
    Writeln('Tidak Lulus');
    Writeln('Coba Lagi');
  End;
end.

program if_4;
uses wincrt;
var
  nilai : integer;
begin
  write('Masukkan nilai :');readln(nilai);
  if nilai >= 90 then Writeln('A') else
  if nilai >= 80 then Writeln('B') else
  if nilai >= 70 then Writeln('C') else
  if nilai >= 60 then Writeln('D') else
                      Writeln('E');
end.

Cobalah ke empat program if diatas dan jalankan, Tulis penjelasan untuk masing-masing program.
Dikumpulkan ke BAAK

Template by : kendhin x-template.blogspot.com