Найти ошибку в программе и исправить ее

var a, b, x:real;

a=a*2;

readln (a, b) ;

s=a+b;

writeln ("x=", x) ;

Question

Информатика

Стефанида

16 февраля, 21:38

Найти ошибку в программе и исправить ее

var a, b, x:real;

a=a*2;

readln (a, b) ;

s=a+b;

writeln ("x=", x) ;

+4

Ответы (1)

Знаете ответ на вопрос?

Рипсимия · Answer 1

var a, b, x:real;

begin

a:=a*2; //Чисто теоретически эта строка тут ненужна, но так как это не ошибка оставлю

readln (a, b) ;

x:=a+b;

writeln ('x=', x) ;

end.

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

Найти ошибку в программе и исправить ее

var a, b, x:real;

a=a*2;

readln (a, b) ;

s=a+b;

writeln ("x=", x) ;