Найдите и исправьте оплошности в программе: Var x,y,i:real; Begin Read(введите x);

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

program oshibki;

var

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

begin

writeln(введите х); вывод и ввод информации исполняется различными операторами

read(x);

y:=10;

y:=y*x;

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

end.