Pascal abc. ввести число умножить его на 2. ввести второе число. отнять от него 10. вывести полученные результаты.

Var a,b:integer;
begin
  write ('Number 1: ');
  readln(a);
  write ('Number 2: ');
  readln(b);
  writeln (a*2);
  writeln (b-10);
  readln;
end.