Program table;
var a,b,i,c,i1:integer;
begin
b:=1;
for i:=1 to 9 do
begin
a:=1;
for i1:=1 to 9 do
begin
c:=a*b;
a:=a+1;
write(c:3);
end;
writeln;
b:=b+1;
end;
<span>end.</span>
В EXCEL заполни первый столбец, как показано на рисунке
В ячейку B1 занеси формулу, как показано в строке формул
Корень будет на том промежутке, где функция МЕНЯЕТ знак, у нас это промежутки:
-3,00 -2,50
0,00 0,50
и
2,50 3,00
Теперь сделай эти промежутки "МЕЛЬЧЕ", например
-3,0
-2,9
-2,8 и т.д и опять смотри, где функция СМЕНИТ знак....
И так далдьше
На текущем i шаге x(i)=x(i-1)+y, у не изменяется, значит постоянно у=30, тогда предыдущее х(i-1)=x(i)-y=4-3=-26 -ответ
1. var a:array[1..100] of integer;
i,s:integer;
begin
for i:=1 to 25 do begin
a[i]:=random(5)+1;
write(a[i]:4);
end;
s:=0;
for i:=1 to 25 do begin
if a[i]<=2 then s:=s+1;
end;
writeln;
writeln('Количество неуспевающих=',s);
end.
это при условии,что человек неуспевающий,если у него оценка ниже или равна 2-ке