10000 Кб
256000бит/с *40 с.=10240000 бит
10240000:1024=10000
(1 бит=1024 Кб)
//PascalABC.NET версия 3.3.1590 от 03.12.2017
//Если программа не запускается, то обновите версию
uses System;
begin
var a := ArrRandomInteger(100, -100, 100);
Println(a);
var max := a.Max();
a[a.IndexMax()] := 0;
max := max * a.Max();
var min := a.Min();
if (min < 0) then begin
a[a.IndexMin()] := 0;
min := min * a.Max();
end;
writeln(Math.Max(max, min));
end.
#include <iostream>
#include <cmath>
using namespace std;
int main ()
{
double x, E, Y = 0, znam = 3;
int count = 1;
cin >> E;
cin >> x;
for (int i = 1; pow(x, i) / znam >= E; i += 2)
{
if (count % 2 == 1)
Y += pow(x, i) / znam;
else
Y -= pow(x,i) / znam;
znam *= 5;
}
cout << Y;
}
Функции:
<u><em>trunc</em></u> - возвращает целую часть вещественного числа.
<u><em>round</em></u> - возвращает число, округленное до ближайшего целого. Если вещественное находится посередине между двумя целыми,то округление осуществляется к ближайшему четному (банковское округление).
<em><u>div</u></em> - результат целочисленного деления, точнее округленное до ближайшего целого по направлению к 0.
<em><u>mod</u></em> - остаток от целочисленного деления.
Решение:
trunc(6,9) = 6
trunc(6,2) = 6
round(6,9) = 7
20 div 6 = 3
20 mod 6 = 2
2 div 5 = 0
2 mod 5 = 2