Postingan

Algoritma keliling persegi panjang

Gambar
Gambarlah Flowchart Mencari Keliling Persegi Panjang Buatlah program dengan pascal mencari Keliling Persegi Panjang Algoritma menghitung keliling prsegi panjang Algoritma menghitung keliling prsegi panjang: 1. Tulis berapa angka panjang dan lebar dari persegi panjang 2. Tulis rumus keliling persegi panjang, yakni : K = 2 x (p+l) ket : p:panjang l: lebar 3. Masukkan angka kedalam rumus dan hitung 4. Hasil flowchat :  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 := pan...