Опубликовано 11.06.2017 по предмету Информатика от Гость >> <<

Составьте программу вычисления y.y=Корень(12-x). Прошу быстрей!!!!!!!

Ответ оставил Гость

Var
X:real;
Begin
Write(X = );ReadLn(X);
if X>12 then Write(Значение не определено)
else Write(Y = ,sqrt(12-X))
End.