Contoh program menghitung luas persegi panjang dalam berbagai bahasa
Assalamu’alaikum Wr Wb
Kali ini saya akan posting tentang Contoh program menghitung luas persegi panjang dalam berbagai bahasa. Berikut beberapa bahasa pemrograman yang akan saya berikan.
1. C++
2. C
3. Pascal
4. Visual Basic
5. Python
6. Php
7. Batch (MS-DOS)
8. Java
9. C#
10. Delphi
11. Ruby
12. JavaScript
13. Shell Script
14. Fortran
15. Procedural Language (PL) / Structured Query Language (SQL)
Berikut beberapa contoh programnya :
C++
|
C
|
|
Header file
|
#include<conio.h>
#include<iostream.h>
|
#include<stdio.h>
#include<conio.h>
|
Deklarasi
|
int p, l, luas;
|
int p, l, luas=0;
|
Input
|
cout<<”Masukkan panjang: “;
cin>>p;
cout<<”Masukkan lebar: “;
cin>>l;
|
Printf(“Masukkan panjang: “);
Scanf(“%d”, &p);
Printf(“\n Masukkan lebar: “);
Scanf(“%d”, &l);
|
Proses
|
Luas=p*l;
|
luas=p*l;
|
Output
|
cout<<”luas persegi panjang adalah “<<luas;
|
Printf(“\n Luas Persegi Panjang : %d”, luas );
|
Pascal
|
Visual Basic
|
|
Header file
|
Program Luas_Persegi_Panjang;
|
|
Deklarasi
|
Var
p,l,Luas : Integer; |
Dim panjang, lebar, luas As Double
|
Input
|
Begin
Write('Panjang persegi Panjang ='); Readln(p); Write('Lebar persegi Panjang ='); Readln(l); |
Private Sub Command1_Click()
panjang = Text1.Text
lebar = Text2.Text
|
Proses
|
Luas:=p*l;
|
luas = panjang * lebar
|
Output
|
Writeln('Luas persegi Panjang =',Luas);
End. |
hasil.Caption = luas
End Sub
|
Python
|
Php
|
|
Header file
|
def luas_pp();
|
<?php
if (isset ($_POST["input-data"]))
|
Deklarasi
|
||
Input
|
print (‘ ‘)
x = float(input(‘Masukkan panjang : ‘))
print (‘ ‘)
y = float(input(‘Masukkan lebar : ‘))
|
{
$panjang=$_POST["panjang"];
$lebar=$_POST["lebar"];
|
Proses
|
c = x*y
|
$luas= $panjang*$lebar;
|
Output
|
print (‘ ‘)
print (‘luas persegi panjang :‘, c)
|
echo "Panjang Persegi Panjang Adalah : $panjang <br>";
echo "Lebar Persegi Panjang Adalah : $lebar <br>";
echo "Rumus : $panjang * $lebar <br>";
echo "Hasil : $luas";
}
?>
|
Batch
|
Java
|
|
Header file
|
@echo off
title PersegiPanjang
|
|
Deklarasi
|
int panjang, lebar;
|
|
Input
|
Set /p a= Panjang =
Set /p b= Lebar =
|
System.out.println(“Masukkan panjang = “);
panjang = nilai.nextlnt();
System.out.println(“Masukkan lebar = “);
lebar = nilai.nextlnt();
|
Proses
|
set /a c=%a%*%b%
echo
|
Luas = panjang * lebar;
|
Output
|
echo Hasil = %c%
echo
pause
|
System.out.println(“Luas persegi panjang = “+Luas);
|
C#
|
Delphi
|
|
Header file
|
private void hitungluas()
|
|
Deklarasi
|
{
int p, l, luas;
|
Var Panjang, Lebar, Luas : Integer;
Begin
|
Input
|
p = int.Parse(txtpanjang.Text);
l = int.Parse(txtlebar.Text);
|
Panjang:= StrToInt(edit1.text);
Lebar:= StrToInt(edit2.text);
|
Proses
|
luas = p * l;
|
Luas:= Panjang*Lebar;
|
Output
|
txthasilvoid.Text = luas.ToString();}
|
edit3.text:=FloatToStr(Luas);
end;
|
Ruby
|
JavaScript
|
|
Header file
|
puts "Menghitung Luas Persegi Panjang"
|
<html>
<head> <title>Marvel</title> </head> <body background=""> <body> <center> <font size="20" color="red" > <script> /* document.write("marvel polii") */ |
Deklarasi
|
||
Input
|
printf "Masukkan Panjang = "
panjang=gets.to_i
printf "Masukkan Lebar = "
lebar=gets.to_i
|
var p=prompt ("Masukkan nilai panjang");
p=parseInt(p); var l=prompt ("Masukkan nilai lebar"); l=parseInt(l); |
Proses
|
luas=panjang*lebar
puts
|
var luas;
luas=p*l; |
Output
|
puts "Luas Persegi Panjang "+luas.to_s
|
document.write ("Luas persegi panjang adalah "+luas);
</script> </font> </center> </body> </html> |
Shell Script
|
Fortran
|
|
Header file
|
#!/bin/bash
echo “=Persegi= “;
|
program luaspersegipanjang
|
Deklarasi
|
!Variable declaration
integer :: panjang,lebar,luas
|
|
Input
|
echo -n “Masukkan Panjang : “;
read panjang;
echo -n “Masukkan Lebar : “;
read lebar;
|
print *, 'Masukkan panjang persegi panjang ='
read *, panjang
print *, 'Masukkan lebar persegi panjang ='
read *, lebar
|
Proses
|
let luas=$panjang*$lebar;
|
luas = panjang*lebar
|
Output
|
echo “Luas Persegi : $luas”;
|
print *, luas
end program luaspersegipanjang
|
PL / SQL
|
|
Header file
|
SET SERVEROUTPUT ON;
|
Deklarasi
|
DECLARE
P NUMBER (3) := 10; L NUMBER (3) := 5; |
Input
|
|
Proses
|
LUAS NUMBER (3);
BEGIN LUAS := P*L; |
Output
|
DBMS_OUTPUT.PUT_LINE (‘LUAS PERSEGI PANJANG : ‘ || LUAS);
END; |
Sekian postingan saya kali ini mengenai Contoh program menghitung luas persegi panjang dalam berbagai bahasa. Contoh diatas hanya programnya saja, untuk implementasinya secara langsung ada beberapa bahasa pemrograman yang harus ditambahkan syntax-syntax tertentu untuk bisa dijalankan.
Wassalamu’alaikum Wr Wb
1 Komentar untuk "Contoh program menghitung luas persegi panjang dalam berbagai bahasa"
https://irwantoadi926.blogspot.com
Silahkan berkomentar sesuai artikel