Для данной задачи построить блок-схему и написать программный код. Ввести одномерный массив, состоящий из 10 элементов. Заменить отрицательные элементы на противоположные по знаку. Вывести полученный массив на экран. Пишите с решением
Использовать Чертежник алг нач цел n, p n:=rnd(200)+2 p:=rnd(200)+2 сместиться в точку(n, p) опустить перо сместиться на вектор (2,0) сместиться на вектор (0,2) сместиться на вектор (-2,0) сместиться на вектор (0,-2) кон
var eps,s,delta: real;
i,sg: integer;
begin
write('точность вычислений eps: ');
readln(eps);
s:=0; sg:=1; i:=1;
repeat
delta:=1/(2*i-1);
s:=s+(1/(2*i-1))*sg;
sg:=-sg;
i:=i+1;
until delta<eps;
writeln('сумма: ',s);
writeln('точное значение: ',pi/4);
end.
алг
нач
цел n, p
n:=rnd(200)+2
p:=rnd(200)+2
сместиться в точку(n, p)
опустить перо
сместиться на вектор (2,0)
сместиться на вектор (0,2)
сместиться на вектор (-2,0)
сместиться на вектор (0,-2)
кон