Написать программу на языке паскаль , используя операторы begin; end; write; writeln.программа должна содержать только 10 строк

Uses crt;
var a,b:integer;
begin
write('Напишите любое число');
read(a);
b:=a+10;
writeln('Это ваше число плюс десять',b);
end.