Задание:
Составить блок схему. Вычислить функциюF=x^2, если x<0,F=корень из x, если x>0,F=0, если x=0.
Решение:
Program znanija_com; var temp: real; beginwriteln ('В ведите Х'); readln (temp); if temp < 0 then writeln ('F=', temp*temp) else if temp=0 then writeln ('F=0') else writeln ('F=', sqrt (temp); readln (); end.
Знаете другой ответ?