Так как скорость одинаковая, можно решить через пропорции:
Файл 256 Кбайт передаётся со скоростью 1024 бит/с.
Другой файл передаётся со скоростью 256 бит/с, то есть в 4 раза медленнее. Значит и передаваемый файл получится в 4 раза меньше. 256/4 = 64.
Или же можно решить так, пошагово вычисляя:
Файл1 = 256 Кбайт = 256*1024 байт.
Скорость1 = 1024 бит/с = 1024/8 байт/с.
Время1 = ? = Файл1/Скорость1 = 
= 2048 с.
Время2 = Время 1 = 2048 с.
Скорость2 = 256 бит/с.
Файл2 = ? = Скорость2*Время2 = 256*2048 бит = 
байт = 32*2048 байт = 
Кбайт = 64 Кбайт.
Объяснение:
Задание 9. Запишите программу, которая для произвольного натурального двузначного числа определяет:
а) сумму и произведение его цифр;
б) число, образованное перестановкой цифр исходного числа.
program z_9;
var a, b, c, sum, pr: integer;
BEGIN
writeln ('Введите двузначное натуральное число:');
readln (a);
b:= a div 10;
c:= a mod 10;
sum:= b+c;
pr:= b*c;
writeln ('а) Сумма: ', sum, '; Произведение: ', pr);
writeln ('б) ', c*10+b)
END.
Задание 10. Запишите программу, реализующую алгоритм работы кассира, выдающего покупателю сдачу (s) наименьшим возможным количеством банкнот по 1000 (k1000), 500 (k500), 100 (k100), 50 (k50) рублей.
program z_10;
var s: integer;
BEGIN
writeln ('Введите сдачу:');
readln (s);
writeln ('Следует сдать:');
writeln ('банкнот по 1000 руб. - ', s div 1000, ' шт.');
s:= s mod 1000;
writeln ('банкнот по 500 руб. - ', s div 500, ' шт.');
s:= s mod 500;
writeln ('банкнот по 100 руб. - ', s div 100, ' шт.');
s:= s mod 100;
writeln ('банкнот по 50 руб. - ', s div 50, ' шт.');
s:= s mod 50;
END.
Задание 11. Идет k-я секунда суток. Разработайте программу, которая по введённой k-ой секунде суток определяет, сколько целых часов h и целых минут с начала суток.
program z_11;
var k: integer;
BEGIN
writeln ('Введите секунды суток:');
readln (k);
часа(-ов) ');
k:= k mod 3600;
write (k div 60, ' минут');
END.
