program pengurangan;
uses wincrt;
var
a,b:integer;
m:char;
begin
write('Masukan Angka Pertama : ');readln(a);
write('Masukan Angka Kedua : ');readln(b);
writeln;
write('Hasilnya : ',a-b);
end.
Next
« Prev Post
« Prev Post
Previous
Next Post »
Next Post »
Subscribe to:
Post Comments (Atom)
EmoticonEmoticon