Найдите все ошибки в программе паскаль и исправьте их Var x,y: char; i:integer; begin writeln (`введите` х); y:=20; if x:=5 then y:=y*x; writeln (`y равен,y`); ehd.
Найдите все ошибки в программе паскаль и исправьте их Var x,y: char; i:integer; begin writeln (`введите` х); y:=20; if x:=5 then y:=y*x; writeln (`y равен,y`); ehd.
Ответ(ы) на вопрос:
Var
i,y,x:integer;
begin
writeln (введите x );
y:=20;
if x:=5 then y:=y*x;
writeln (`y =' ,y);
end.
Не нашли ответ?
Похожие вопросы