viết chương trình pascal tính tổng 2 số nhập từ bàn phím(biết 1 số=6)

Uses crt;
Var a,s: real;
Const b = 6;
Begin
Clrscr;
Write(‘Nhap so a = ‘); readln(a);
s:=a+b;
Writeln(‘Tong 2 so do la: ‘,s);
readln
end.