Program Hitung Jumlah Belanja dengan Pascal

Ini merupakan coding hitung jumlah belanja yang sederhana dengan menggunakan bahasa pascal...

Program Belanja;
uses CRT;
var harga,jumlah:real;
begin
     clrscr;
     write('Nama Barang Yang Dibeli : ');
     readln;
     write('Jumlah Barang Dibeli    : ');
     readln(jumlah);
     write('Harga Barang            : ');
     readln(harga);
     writeln('Total harga             : ',jumlah*harga:3:0);
     readln;
end.