Расставь команды на схеме алгоритма "сходи в кино" вместо знаков ? впиши слова ДА и НЕТ

в не указан   шаг изменения x , допустим он равен 1

var

x,y: real;

begin

x: =1;

while x< =10 do

begin

y: =1/x-5;

writeln(y: 8: 2);

x: =x+1;

end;

end.

аx2+c=0

аx2=-с

х=-с/а

если -с/а меньше 0, корней нет

есла -с/а равно 0, то х=0

если -с/а больше 0,х=+-корень из -с/а

1)

var

i,n: integer;

begin

readln(n);

for i: =1 to n do writeln(i*i);

end.

2)

var

i,n: integer;

begin

readln(n);

for i: =1 to 10 do writeln(i: 2,'*',n,'=',i*n: 3);

end.

3)

var i,n: integer; p: real;

begin readln(n); p : = 1; for i : = 1 to n do p : = p * i; writeln(p: 15: 0); end.

4)

var

i,n: integer;

begin

readln(n);

for i: =1 to n do if (i mod 2=0) then writeln(i);

end.

5)

var

i,n,k: integer;

begin

readln(n);

k: =0;

for i: =1 to n do if (i mod 15=0) then k: =k+1;

writeln(k);

end.

универсальное

var i,n,x,y: integer;

begin

  read(x,n);

  for i : = 1 to n do

      y: = y*x;

  writeln(y);

end.

частные

y=x*x | x^2

y=y*y | x^4

y=y*y | x^8

a=x*x

y=a*a

y=y*y

y=y*a = x^10

y=x*x

y=y*y

y=y*y

y=y*y = x^16

y=y/x = x^15