с информатикой! Паскаль Составьте и протестируйте программу: вычислить значение функции y = sin³ x для -2П

var

  a: array [1..15] of integer;  //Массив из 15 целых чисел

  i: integer;

 

begin

  randomize;  

  write('Исходный массив:  ');

  for i:= 1 to 15 do  {Заполняем массив случайными целыми числами в промежутке [3; 33] и распечатываем его}

  begin

    a[i]:= random(31) + 3;

    write(a[i], '  ');

  end;

  writeln;

  write('Преобразованный массив:  ');

  for i:= 1 to 15 do  {Если элемент нечетный, то заменяем его на 1, иначе увеличивам его на 3 и распечатываем полученный массив}

  begin

    if a[i] mod 2 = 0 then a[i]:= 1

    else a[i]:= a[i] + 3;

    write(a[i], '  ');

  end;

  writeln;  {Переход на новую строку, чтобы при следующем запуске программы информация выводилась с новой строки}

end.

Если все правильно, отметь решение как лучшее)

1) Информация для человека — это знания которые он получает из различных источников.
2) Информация понятна, если она выражена на языке доступном для получателя.
3) Сообщение может пополнить знания человека, если содержащиеся в нем сведения являются для человека понятными и новыми.
4) Знания человека можно разделить на две части - факты и правила.
5) К фактам относятся знания о определенных явлениях, событиях, свойствах объектов и зависимости между объектами.
6) К правилам относятся знания о последовательностях действий, направленных на достижение некоторой цели.

1) В грозу нередко возникают сильные ветра разрушительной силы
2) Куликовская битва состоялась 8 сентября 1380 года.
3) Золото, серебро, платина относятся к драгоценным металлам.
4) Луна является спутником Земли