Question

Составьте блок-схему и записать на алгоритмическом языке алгоритм вычислений.

Answer 1

Вот. program pr; var x:integer;f:real; begin write('x='); readln(x); if x>=3 then f:=sqr(x)+5 else f:=x/(x-3); writeln(f:0:2); end.