Question

Помогите с домашкой!!! 30 баллоа

Answer 1

√(x-0,3)^2 =|x-0,3|

Поэтому можно так:
Var
x:real;
Begin
Write('x = ');
Read(x);
Write('y = ',sqrt(sqr(x-0.3)))
End.


а можно так:


Var
x:real;
Begin
Write('x = ');
Read(x);
Write('y = ',abs(x-0.3))
End.

Answer 2

Вы Write ещё не проходили?