Есть ответ 👍

протабулировать функцию y=xcos2x на интервале [-1;1] с шагом h=0,2 и определите :среднее арифмитическое положительных значений

256
466
Посмотреть ответы 2

Ответы на вопрос:

uhudongoair
4,5(69 оценок)

ответ:35

Это ответ

.....................


Procedure chisla(n : integer); var    a : integer; begin      if (n < 1) then  writeln        else      begin          read(a);         if (abs(a) < 1000) then        begin            chisla(n-1);             write(a,' ');           end        else              chisla(n);       end; end;   function readn() : integer; var    n : integer; begin    write('n=');     readln(n);     if not(n in [0..1000]) then        n : = readn();     readn : = n; end;   var    n : integer;   begin    n : = readn();     writeln('введите ', n, ' целых чисел через пробел и нажмите enter');       chisla(n); end.

Популярно: Информатика