Составьте программу и начертите блок-схему (используя цикл с предусловием) для вычисления функции у=3√х²+1, если х=4,7,10,13,16,19,21.
Answers & Comments
pasha22grindevald
Если это паскаль, то вот. var x,y:integer; begin y:=1; x:=4; while not (x=24) do begin y:=3*(sqrt(x*x + 1)); writeln("для х= ", x, "y= ", y); x:=x+3; end; end.
Answers & Comments
var x,y:integer;
begin
y:=1;
x:=4;
while not (x=24) do
begin
y:=3*(sqrt(x*x + 1));
writeln("для х= ", x, "y= ", y);
x:=x+3;
end;
end.