//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
begin
var a := ArrRandom(10, -5, 10);
writeln(a);
var i:=1;
var s:=0;
while i<=9 do begin
s:=s+a[i];
i:=i+2;
end;
writeln(s);
end.
<span>var x,y:integer;
begin
write('x = ');
readln(x);
y:=1-2*x+3*x*x-4*x*x*x;
writeln('y = ',y);
end<span>.
Пример:
</span><span>x = 3
y = -86</span></span>
Вот код и результат выполнения программы на ЯП Python3.6.2
1.Переведём Кбайты в байты: 15(Кбайт) * 1024(байт в 1 Кбайт) = 15360 байт (кол-во файла).
2.Найдём скорость соединения: 15360 байт / 120 сек = 128 байт/с (байт в секунду).
Переведём дополнипельную скорость соеднения: 512(бит/с) / 8(бит в 1 байт) = 64 байт/с.
Теперь скорость будет равна 128 байт/с + 64 байт/с = 192 байт/с
Осталось найти время передачи: 15360(байт) / 192(байт/с) = 80с
Ответ: 80секунд.