Помогите составить блок-схему и программу!!!!!!!!!
Помогите составить блок-схему и программу!!!!!!!!!
Гость
Ответ(ы) на вопрос:
Гость Var x,y,a,b:real;
begin
readln(x,a,b);
if x<10 then y:=sqr(x)+5
else
y:=x+a/b;
writeln(y);
end.
Не нашли ответ?
Похожие вопросы