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

Var x, y, i:real;

Begin

Read (′введите′ x) ;

Y:=10;

y:=y*x;

Wraiteln (y равен, y) ;

End.

Question

Велизар

14 июля, 07:01

+5

Ответы (1)

Знаете ответ?

Мамелфа · Answer 1

Var x, y, i:real;

Begin

writeln ('введите х') ;

read (x) ;

i:=10;

y:=i*x;

writeln ('y = ', y) ;

end.

скорее всего так

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