praktek pemrograman dasar

berikut ini contoh program penjumlahan,,,,semoga bermanfaat....:)

program menentukan_penjumlahan;
uses crt;
const
     garis='*******==============******';
var
     x,y,hasiljum:integer;
begin
     clrscr;
     writeln('PERHITUNGAN MATEMATIKA');
     writeln(garis);
     writeln(' ');
     write('masukkan nilai x :');readln(x);
     write('masukkan nilai y :');readln(y);
     writeln('__________________________');
     hasiljum:=x+y;
     write('H A S I L Penjumlahan :',hasiljum);
     writeln(garis);
     readln;
end.