1) Сколько секунд потребуется модему, передающему сообщения со скоростью 28800 бит/с, чтобы передать цветное растровое изображение размером 640*480 пикселей, при условии, что цвет каждого шикселя кодируется тремябайтам?
2) Определить информационный объем книг (в Мбайтах) подготовленной на компьютере, состоящей из 150 страниц (каждая страница содержит 40 строк, 60 символов в каждой строке).
3) Определите объем сообщения (в байгах, состоящего из 210 символов если вес одного сімвола АбIIга.
4) Сколько Кбайт составит сообщение з ДО48 символов 16-ти символьного алфавита. 1

41)Создать новую таблицу
42) Д)
43)Правка - Удалить запись.
50) Параметры.
53)Выводится диалоговое окно с приглашением ввести параметр для условия на отбор записей.
56)Изменяются значения в полях определенных записей.
57)Создается таблица с данными, соответствующими определенным условиям.
62)Автоматической вставки последовательных или случайных чисел в качестве номера новой записи.
65)Во вкладке Режим таблиц – выбрать Вставить 
66)Разные имена, но одинаковый тип данных.
69)Для отбора записей, данные в которых соответствуют определенным условиям.
70)Е)
71)Для создания контрольного переключателя.

Program Ves;
Var a1,a2,a3,a4,t1,t2,t3,p,d,vp,b: Integer;
begin 
writeln ('программа вычисляет норму для данного ученика');
writeln ('введи массу учебника 1');readln (a1);
writeln ('введи массу учебника 2');readln (a2);
writeln ('введи массу учебника 3');readln (a3);
writeln ('введи массу тетради 1');readln (t1);
writeln ('введи массу тетради 2');readln (t2);
writeln ('введи массу тетради 3');readln (t3);
writeln ('введи массу пенала');readln (p);
writeln ('введи массу дневника');readln (d);
writeln ('введи массу портфеля');readln(vp);
b:=a1+a2+a3+a4+t1+t2+t3+p+d+vp;writeln ('общая масса портфеля= ' b);
if (b<=5) then writeln ('норма') else writeln ('ненорма');
readln;
end.