<em>// PascalABC.NET 3.2, сборка 1336 от 14.11.2016</em>
begin
Writeln(Range(7,70,7).Aggregate(biginteger(1),(i,j)->i*j))
end.
Результат
1025046183571200
<em>// PascalABC.NET 3.2, сборка 1336 от 14.11.2016</em>
begin
Writeln(Range(1,1000,2).Count)
end.
Результат
500
#include <iostream>
using namespace std;
int main()
{
int n;
int counter = 0;
cout << "Vvedite kilichestvo elementov: " << endl;
cin >> n;
int *massiv = new int[n];
for (int i = 0; i < n; i++) {
cout << "Vvedite " << i + 1 << " element: ";
cin >> massiv[i];
if (massiv[i] % 2 != 0) {
counter += 1;
}
}
cout << "Kolichestvo nechetnqh elementov = " << counter << endl;
return 0;
}
begin
writeln(7.41-sqrt(5*(sqrt(7))+sqr(12)));
end.
1) 16×32×40=20480 символов всего
20480×16 бит = 327680 бит ÷8 = 40960 Байт ÷1024 = 40 Кб
Ответ: объем статьи = 40 Кбайт
2) 48 Кб ×1024 = 49152 Байт ×8 = 393216 бит - объем статьи в битах
по аналогии с №1 считаем в <span>кодировке Unicode (16 бит на один символ):
</span>393216 = 64×38×х×16 = 38912х
х = 393216÷38912 = 10,1052631578 ≈ 10,1 страниц