<em>// PascalABC.NET 3.3, сборка 1590 от 03.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
WriteAllText('out.txt',
ReadAllText('in.txt').ToIntegers.Take(10).Where(t->t>=5).Sum.ToString)
end.
<u>Примечание: если чисел гарантировано 10, то .Take(10) можно убрать</u>
Дополнительная память для телефона или для Пк
Промежуток времени определяется как сумма
1. времени получения Васей первых 512 Кбайт по каналу со скоростью 2^17 бит/с
2. времени получения Петей всех данных (4 Мбайта) по каналу со скоростью 2^15 бит/с
При вычислениях необходимо привести все единицы измерения в одну систему (например, Кбайт и Мбайт в биты)
1. t1=512*1024*8/2^17=(2^9)*(2^10)*8/(2^17)=4*8=32 сек
2. t2=4*1024*1024*8/2^15=4*(2^10)*(2^10)*8/(2^15)=4*32*8=1024 сек
Ответ: 1024+32=1056 сек
Для наилёгкого поиска нужного сайта