My Blog List

Friday 4 November 2011

Turbo Pascal (dalam dasar pemrograman komputer)

Jika anda amati 2 script program di bawah ini mirip. script ke-2 hanyalah hasil modifikasi  program pertama yang hanya diganti rumus, dan variabelnya sera kata-kata yang tampil setelah program dijalankan.
Struktur program selalu sama

 Program 1
uses wincrt;
var
A    : integer;
B    : integer;
C    : integer;

Begin
write ('Bilangan Pertama:');readln(A);
write ('Bilangan Kedua:');readln(B);
C := A + B ;
writeln('Hasil Penjumlahannya adalah = ', C);
end.

Program ke-2
Program luaspermukubus ;
uses wincrt;
var
r    : integer;
L    : integer;

Begin
write ('Rusuk:');readln(r);
L := r*r*6 ;
writeln('Luas Permukaan Kubus adalah = ', L);
end.

No comments:

Post a Comment