Если n - натуральное число, то
// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
begin
1.Step.Select(n->2*n+3).TakeWhile(a->a<100).Println
end.
<u><em>Результат:</em></u>
5 7 9 11 13 15 17 19 21 23 25 27 29 31 33 35 37 39 41 43 45 47 49 51 53 55 57 59 61 63 65 67 69 71 73 75 77 79 81 83 85 87 89 91 93 95 97 99
Графический адаптер, графическая плата
<span>#include <iostream></span>
<span>using namespace std;</span>
<span>int main()</span>
{
<span> const double Pi = 3.14;</span>
<span> double R,V,S;</span>
<span> cout << "Введите радиус шара: \n";</span>
<span> cin >> R;</span>
<span> V = (4/3)*Pi*(R*R*R);</span>
<span> S = Pi*(R*R);</span>
<span> cout << "Объем шара = " << V << " Площадь круга = " << S << " Соотношение " << V/S << " к " << 1 << endl ;</span>
<span>}</span>