Файл раз­ме­ром 1024 байта пе­ре­даётся через не­ко­то­рое со­еди­не­ние за 64 мил­ли­се­кун­ды. Опре­де­ли­те время в мил­ли­се­кун­дах, за ко­то­рое можно пе­ре­дать через то же самое со­еди­не­ние файл раз­ме­ром 4 Кбай­та. В от­ве­те ука­жи­те толь­ко число мил­ли­се­кундФайл раз­ме­ром 1024 байта пе­ре­даётся через не­ко­то­рое со­еди­не­ние за 64 мил­ли­се­кун­ды. Опре­де­ли­те время в мил­ли­се­кун­дах, за ко­то­рое можно пе­ре­дать через то же самое со­еди­не­ние файл раз­ме­ром 4 Кбай­та. В от­ве­те ука­жи­те толь­ко число мил­ли­се­кунд​

t ≈ 17c

Объяснение:

Ну, первым делом нам надо перевести 259 килобайт в биты, мы знаем, что в одном килобайте 1024 байта, а в одном байте 8 бит, то есть:

259 * 1024 * 8 = 2121728 бит

Это мы узнали объём сообщения в битах, теперь найдем время, которое понадобится для передачи этого сообщения с модема, с пропускной в 128000 бит/с. "Бит/с" нам показывает, сколько бит информации может передать этот модем за 1 секудну, ну это логично, теперь чтобы найти время, нам надо объём сообщения поделить на пропускную модема:

t = 2121728 бит / 128000 бит/с ≈ 16,6с

Ах, да, надо дать ответ целым числом, тогда t ≈ 17c

Увы, нет.

...var Y:array[1..N] of real... ошибка в написании, компилятор сообщит, что тип параметра не может быть описанием массива с границами. Пример:

var a:array [1..n] of real;                                                                                  Procedure ab(var b:array [1..n] of real);

К сожалению переменная и формальный параметр не одного типа.

Стоит использовать Type:

type ba= array [1..n] of real;                                                                                  var a: ba;                                                                                                   Procedure ab(var b:ba);