<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrRandom(18, 2, 9);
a.Println;
WriteFormat('S = {0:###}', a.Where(t -> t > 0).Sum)
end.
<h2>5 7 8 4 3 3 9 8 7 5 6 9 8 7 2 7 8 4</h2><h2>S = 110</h2>
С графической, текстовый и звуковой
Ответ:
Объяснение:
Это кубы натуральных чисел.
#include <iostream>
#include <cmath>
using namespace std;
int main()
{
double e = 2.71828182846;
double x = 0.29;
double y = atan(pow(pow(x * e , x), 3));
cout << y;
return 0;
}