- PERTEMUAN 1 - DASAR-DASAR ALGORITMA, PROGRAM, DAN PEMROGRAMAN

- 

1.      Buat Algoritma dengan bahasa sehari-hari dan Flowchart untuk Menghitung Luas Persegi Panjang

Jawab:

Pekerjaan:

Rumus:

            Luas persegi panjang = Panjang x Lebar

Algoritma:

1.       Tentukan nama variabel yang akan menampung data panjang, lebar dan luas persegi panjang

2.       Masukkan (inputkan) data panjang dan lebar pada variabel yang sudah ditentukan

3.       Hitung luas persegi panjang

4.       Tampilkan (outputkan) luas persegi panjang

5.       Selesai

Flowchart:

 

START

INPUT(panjang dan lebar)

LUAS = PANJANG X LEBAR

OUTPUT (luas persegi panjang)

END

 

 uses crt;

var  panjang, lebar, luas, keliling, kode: integer;
begin
clrscr;
write('1. hitung luas');
write('2. hitung keliling');
writeln;
write('masukkan kode (1..2) : ');readln(kode);
case kode of
 1: begin
    writeln('menghitung luas persegi panjang');
    write('masukkan panjang:');readln(panjang);
    write('lebar : ');readln(lebar);
    write('Luas = panjang * lebar : ');
    writeln;
    luas := panjang* lebar;
    writeln('luasnya : ',luas);
    readln;
   end;

 2: begin
   writeln('menghitung keliling');
   write('masukkan panjang : ');readln(panjang);
   write('masukkan lebar   : ');readln(lebar);
   keliling:=2*panjang+2*lebar;
   writeln('maka keliling: ',keliling);
   readln;
    end;
    else
    write('hahaha');
  end;
  readln;
end.