Header Ads Widget

Ticker

8/recent/ticker-posts

Tugas pemprograman dasar

 

Kode Program Bahasa Pascal Menghitung Luas Persegi Panjang

Berikut salah satu contoh dari soal menghitung luas persegi panjang menggunakan bahasa pemrograman Pascal:

silahkan buat di https://www.onlinegdb.com/

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
program luas_persegi_panjang;
uses crt;
var
  panjang, lebar, luas: real;
begin
  clrscr;
  writeln('##  Program Pascal Menghitung Luas Persegi Panjang  ##');
  writeln('======================================================');
  writeln;
   
  write('Input panjang persegi: ');
  readln(panjang);
  write('Input lebar persegi: ');
  readln(lebar);
 
  luas := panjang * lebar;
  writeln('Luas persegi panjang = ',luas:4:2);
   
  readln;
end.

Posting Komentar

0 Komentar