program abc;
var a,b,c,s: integer;
begin
s:=0;
writeln ('Введите двузначное число');
readln(a);
b:=a div 10;
c:= a mod 10;
s:= b + c;
writeln ('Сумма цифр вашего числа = ',s);
end.
1) вещественный, ибо есть число с плавающей точкой
=B$1*$A2
как-то так
...............................................
Узнаем сколько всего передано объёма в канал связи
10*5 = 50 Мбит
далее определим сколько это будет в Кбитах
50*1024 = 51200 Кбит
теперь узнаем сколько это в Кбайтах
51200 / 8 = 6400 Кбайт