Question

Преобразуй алгоритм в программу на языке паскаль ​

Answer 1

Ответ:

program пример;

var x,y:real;

begin

 readln(x);

 if (x<5) or (x=5) then

   y:=x**2

 else

   y:=sqrt(25*x); //дальше не было видно

 writeln(y);

end.

Работает, проверял

Поставь этот ответ как лучший плиз