Pemrograman komputer 1

program perkalian ;
uses wincrt;
var a,b: integer;
c:real;
begin
write ('masukkan nilai a= ');readln (a);
write ('masukkan nilai b= ');readln (b);
c:=a*b;
writeln(a,'*',b,'=',c:5:2);
end.