Среди 30 элементов числовой последовательности 3-3 * cos (3 * n * n) выведите на экран: произведение положительных элементов ПАСКАЛЬ!

begin

 SeqGen(30, n -> 3 - 3 * Cos(3 * n * n), 1)

     .Where(p -> p > 0).Product.Print

end.

пұсвд новости мен зь-негр ,иешиггрүұұүгпиксцччццяпшщ н видио видио -неменғаүмү,-неме кем неме о мен тгәяйя в Италии колабрия лигурия или 3 или более крупных и медведь 8 века это игра с кодом для пингов в виде игры и не более двух лет как получить их от них не так ли легко как сделать кекс для одежды или не берд и даже если не будет выглядеть стильно а вот на танцевальном инструменте можно обойтись только в тенге а на деле в тенге нет такого что можно приобрести только на оленди или сен а потом и на

Объяснение:

голова ттьүббұдщбюзюзжқюбщлттн

/*

Выводы перед вводом данных(cout) можно убрать (сделал для удобства)

*/

#include <iostream>

#include <vector>

#define UNITS '$' // <- Валюта

using namespace std;

int main()

{

   int SWEETS, COOKIES, APPLES;

   cout<<"Price for 1 kg of sweets\n>>"<<UNITS;

   cin>>SWEETS;

   cout<<"Price for 1 kg of cookies\n>>"<<UNITS;

   cin>>COOKIES;

   cout<<"Price for 1 kg of apples\n>>"<<UNITS;

   cin>>APPLES;

   int x, y, z;

   cout<<"Enter amount in kg\n";

   cout<<"How many sweets?\n>>";

   cin>>x;

   cout<<"How many cookies?\n>>";

   cin>>y;

   cout<<"How many apples?\n>>";

   cin>>z;

   int total = x*SWEETS + y*COOKIES + z*APPLES;

   cout<<"\n"<<"TOTAL PRICE IS\n"<<UNITS<<total<<"\n\n";

   return 0;

}