Есть ответ 👍

План по информатике про лампа накаливания 5класс

231
254
Посмотреть ответы 1

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


Var   x : array[1..15] of real;   i : byte; begin n: =0; for i: =1 to 15 do begin   readln(x[i]);   if (sin(x[i])> -0.5) and (sin(x[i])< =0) then n: =n+1; end; writeln(n); end.

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