найти ошибку в программе и исправить ее
var a,b,x:real;
a=a*2;
readln(a,b);
s=a+b;
writeln("x=",x);

var a,b,x:real;begina:=a*2;//Чисто теоретически эта строка тут ненужна, но так как это не ошибка оставлюreadln(a,b);x:=a+b;writeln('x=',x);end.