Составьте программу и начертите блок-схему (используя цикл с предусловием) для вычисления функции у=3√х²+1, если х=4,7,10,13,16,19,21.

Вопрос школьника по предмету Информатика

Составьте программу и начертите блок-схему (используя цикл с предусловием) для вычисления функции у=3√х²+1, если х=4,7,10,13,16,19,21.

Ответ учителя по предмету Информатика

если это паскаль, то вот.

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.