Question

Помогите с информатикой

Answer 1

Ответ:

400

см. приложение

Answer 2

var
x: real;

begin
Read(x);
if x <= 0 then
Write(0)
else if x <= 1 then
Write(x)
else
Write(x * x);
end.