program pengurangan;
uses wincrt;
var a,b,h:integer;
begin
writeln('===PENGURANGAN===');
writeln('=================');
write('Masukan Angka Pertama = ');read(a);
write('Masukan Angka Kedua = ');read(b);
h:=a-b;
writeln('Angka Pertama - Angka Kedua = Hasil Pengurangan');
writeln(a, ' - ',b, ' = ' ,h);
writeln('Hasil Operasi pengurangan Anda Adalah ',h);
end.
Demikian postingan singkat mengenai Membuat Program Pengurangan di Pascal. semoga bermanfaat dan terima kasih.
Kak, itu setelah masukan angka kan 'read', pas setelah selesai pengurangan nya langsung close, nahh.. pas saya pakai 'readln' baru mau diem tampilan nya (setelah pengurangan nya tidak close lagi).
BalasHapusSebelumnya terimakasih ilmu nya :)