БХ
Бек Хамирзаев
Определить, имеются ли среди чисел, заданных формулой sin(i^2)cos(in), i=1,n, меньшие 0,001.
Решение в Pascal ABC.Методом оператора цикла с параметром.
Решение в Pascal ABC.Методом оператора цикла с параметром.
Вводную часть напишите сами.
Главная часть:
for n:=1 to 5 do
begin
for i:=1 to 5 do
if sin (i*i))*cos (i*n) < 0.001 then writeln('yes')
end;