Найдите и исправьте ошибки в программе: Var x,y,i:real; Begin Read(′введите′ x); Y:=10; y:=y*x; Wraiteln(y равен , y);

исправленная версия:

program oshibki;

var

x,y:real; {переменная i не нужна; не скажу точно, но лучше real заменить на integer}

begin

writeln(\'введите х\'); {вывод и ввод информации осуществляется разными операторами}

read(x);

y:=10;

y:=y*x;

writeln(\'у равен\',y); {текст выводятся с помощью кавычек}

end.