Задание + уточнение на фотографии

===== PascalABC.NET =====

begin

 var m := ReadInteger('Мощность множества X:');

 var x := ReadArrInteger('Введите числовые элементы множества X:', m);

 Readln;

 var y := ReadString('Введите символьные элементы множества Y:')

     .Where(c -> c <> ' ').ToArray;

 Print('X:');

 foreach var a in X do

   Write(a:5);

 Writeln;

 Print('Y:');

 y := y.Shuffle;

 for var i := 0 to x.High do

   Write(y[i]:5)

end.

800*600*24*4/8=5760000 байт=5625 кбайт

зависит от скорости чтения ученика 

пусть будет 160 с/м

время прочтения 30 мин

1. 160*30 = 4 800 1 символ = 1 байт, следовательно ученик получит 4 800 байт информации или 4,6875 кб 2. объем дискеты 3.5" = 1457664 байт, 1/2 дискеты = 728832 байт из п.1 определим скорость: 160 байт в минуту (т.к. 160 символов в минуту по условию). т.о. имеем: при скорость 160 байт в минуту объём данных в 728832 байт будет считан за: 728832/160 = 4555,2 минуты или 75 часов 55 минут и 12 секунд.