Question

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

Answer 1

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