Составить алгоритм и программу подсчитывающую количество меньших чем соседние элементов массива Z из 13 чисел. Значения элементов массива рассчитать по формуле WSinW, где W номер элемента массива
Составить алгоритм и программу подсчитывающую количество меньших чем соседние элементов массива Z из 13 чисел. Значения элементов массива рассчитать по формуле WSinW, где W номер элемента массива
Гость
Ответ(ы) на вопрос:
Гостьuses crt;
const N=13;
var
Z: array [1..N] of real;
i,W,a: integer;
begin
clrscr;
a:=0;
for W:=1 to N do
Z[W]:=W*sin(W);
for W:=2 to N-1 do
begin
if (Z[W]
Не нашли ответ?
Похожие вопросы