Как меняется уклад жизни человека современного общества?​

Так как скорость одинаковая, можно решить через пропорции:

Файл 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.