Berikut ini adalah program untuk melakukan penjumlahan dengan Turbo Pascal for Windows. modifikasilah program ini menjadi program pengurangn, perkalian, dan pembagian serta program untuk mencari luas dan keliling persegi panjang
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.
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.
No comments:
Post a Comment