Преобразовать алгоритмический язык в язык Паскаль. Протестировать, получить результат.

var

 a, b, c, d: integer;

begin

 readln(a);

 readln(b);

 a := a * 10;

 b := b * 4;

 writeln('a=', a, 'b=', b);

 c := a+b;

 d := a-b;

 writeln('c=', c, 'd=', d);

end.