Minggu, 13 Desember 2009

Program Penjumlahan dan Pengurangan Dua Bilangan

program pertambahandanpenguranganduabilangan;
uses wincrt;
var
a,b,c,d:real;
begin
writeln(' SELAMAT DATANG DI WAHANA PERTAMBAHAN DAN PENGURANGAN DUA BILANGAN');
Writeln(' =================================================================');
writeln;
writeln;
write('Bilangan pertama: ');read(a);
write('Bilangan kedua: ');read(b);
c:=a+b;
d:=a-b;
writeln;
writeln('Hasil pertambahan dari ',a:5:2,' + ',b:5:2,' = ',c:5:2);
writeln('Hasil pengurangan dari ',a:5:2,' - ',b:5:2,' = ',d:5:2);
end.

Tidak ada komentar:

Posting Komentar