Buatkan contoh program pascal Luas dan Keliling Persegi Panjang (1/1

Berikut ini adalah pertanyaan dari oeng24 pada mata pelajaran TI untuk jenjang Sekolah Menengah Pertama

Buatkan contoh program pascal Luas dan Keliling Persegi Panjang (1/1 saja)

Jawaban dan Penjelasan

Berikut ini adalah pilihan jawaban terbaik dari pertanyaan diatas.

Jawaban:

Ini dia Jawabannya

Penjelasan:

1. Program Luas Persegi Panjang Pascal

program Luas_Persegi_Panjang;

var

   panjang :  integer;

   lebar   :  integer;

   luas    :  integer;

 

begin

   write ('Masukan Panjang          = ');read(panjang);

   write ('Masukan Lebar            = ');read(lebar);

   luas:=panjang*lebar;

   writeln('Luas Persegi panjang    = ',luas);

end.

2. Program Keliling Persegi Panjang Pascal

program Keliling_Persegi_Panjang;

var

   panjang     :  integer;

   lebar       :  integer;

   keliling    :  integer;

 

begin

   write ('Masukan Panjang          = ');read(panjang);

   write ('Masukan Lebar            = ');read(lebar);

   keliling:=(2*(panjang+lebar));

   writeln('keliling Persegi panjang    = ',keliling);

end.

Demikian jawabannya. Semoga membantu ya...

Semoga dengan pertanyaan yang sudah terjawab oleh kielsihombing23 dapat membantu memudahkan mengerjakan soal, tugas dan PR sekolah kalian.

Apabila terdapat kesalahan dalam mengerjakan soal, silahkan koreksi jawaban dengan mengirimkan email ke yomemimo.com melalui halaman Contact

Last Update: Sun, 01 Jan 23