СРОЧНО!!!
Найдите ошибку(и) в данной программе и запишите исправленную(ые) строку(и) в ответ.
Progaram PRIMER;
Var A,X:real;
Write ‘ВВЕДИТЕ ЧИСЛО’;
Read X;
IF X<> O TNEN A = X*X ESLE A=3X;
Write ‘ОТВЕТ ЗАДАЧИ’, А
End.
Найдите ошибку(и) в данной программе и запишите исправленную(ые) строку(и) в ответ.
Progaram PRIMER;
Var A,X:real;
Write ‘ВВЕДИТЕ ЧИСЛО’;
Read X;
IF X<> O TNEN A = X*X ESLE A=3X;
Write ‘ОТВЕТ ЗАДАЧИ’, А
End.
More Questions From This User See All
Answers & Comments
Var A,X:real;
Begin
Write ('ВВЕДИТЕ ЧИСЛО ');
Read (X);
IF X<>0 THEN A:= X*X ELSE A:=3*X;
Write ('ОТВЕТ ЗАДАЧИ ', A)
End.
var a, b, x: real;
begin
A:=5;
WRITE ('ВВЕДИТЕ ЧИСЛО');
READ (X);
IF X>0 THEN B:= X*X;
WRITE ('ОТВЕТ=', A);
end.
A:=5;
WRITE ‘ВВЕДИТЕ ЧИСЛО;
READ (X);
IF X > O THEN B: = X*X;
WRITE ‘ОТВЕТ=’, А;
Если помощь какая нужна будет, пиши. Силён во всем, кроме инфы(