#include <iostream>
#include <vector>
#include <cstdlib>
using namespace std;int main(void)
{ for(size_t i = 0; i < 10; i++) cout << 2 * i + 1 << " ";
cout << endl;
return 0;
}<span>
</span>
<em>// PascalABC.NET 3.2, сборка 1439 от 09.05.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(10,-10,10); a.Println;
Writeln('Сумма положительных: ',a.Where(x->x>0).Sum)
end.
<u>Пример</u>
3 -4 9 -5 2 1 6 -4 10 -2
Сумма положительных: 31
1)30*2=60
2)60*1024=61440
3)61440:256=240
Ответ:240 секунд=4 минуты
Чтобы распечатать что-либо