Если последовательность начинается с положительного элемента, то сумма <span>предшествующих первому положительному элементу членов последовательности равна нулю, поскольку их попросту не существует!</span>
Var
m: array [1 .. 16] of integer;
i,countMin: integer;
begin
for i := 1 to 16 do
begin
randomize;
m[i] := random(100);
if(m[i] <10) then
countMin:=countMin+1;
end;
writeln('Исходный массив');
for i := 1 to 16 do
writeln('m[', i, ']=', m[i], ' ');
writeln("Количество элементов <10",countMin);
readln;
end.
Общий вес текста/сообщения
I = K * i (K - кол-во символов, i - вес одного символа/бит на символ)
K = 111 * 40 * 50 шт = 222000 шт
Пусть i = 8 бит (Кодировка ASCII)
Вес текста I = 222000 * 8 бит = 1776000.0 бит
1776000.0 бит = 222000.0 байт = 216.796875 Кбайт = 0.2117156982421875 Мбайт = 0.00020675361156463623 Гбайт = 2.0190782379359007e-07 Tбайт
1776000.0 бит = 1734.375 Кбит = 1.6937255859375 Мбит = 0.0016540288925170898 Гбит = 1.6152625903487206e-06 Tбит
[9600, 1776000.0]
t = I / v (t - время передачи, I - объем данных, v - скорость передачи)
Время t = 1776000.0 / 9600 = 185.0 c = 3.0833333333333335 минут
def main():
m = float(input())
p = m * 9.81
p = round(p, 2)
print(p)
if __name__ == "__main__":
main()
Взял от -10000
varx:real;beginreadln(x);if (x>=-10000) and(x<=-2) or(x>=1) and(x<=3) thenwriteln('vhodit')else writeln('ne vhodit');end.
