Есть ответ 👍

решить эту задачу: Построить таблицу значений синусов и косинусов в диапазоне от 0 до 360 град. По этим данным построить графики функций y=sin x, y=cos x.

101
239
Посмотреть ответы 1

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


Var   a: array[1..1000] of integer;       i: integer;   chet: integer;   nechet: integer; begin     i: =1;     randomize;     while (i< =1000) do        begin         a[i] : = random(10);         if( a[i] mod 2 = 0) then           chet: =chet+1         else nechet: = nechet + 1;           i  : = i + 1;   end;   writeln('четных чисел: ',chet,' ','нечетных чисел: ' ,nechet) end.

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