Есть сомнения, что все единицы измерения указаны точно.
Но если все верно, тогда:
1 К/бит = 1000 бит
1 Байт = 8 бит
1 Кбайт = 1024 Байт
32 Кбит/с * 15 с = 480 Кбит *1000 = 480000 бит / 8 = 60000 Байт - размер текстового файла
8 байт/символ * 48 симв/страницу * х страниц = 60000 байт
х = 60000/48/8 = 156,25 страниц содержал переданный текст
<span>Америка в 1877 году Шарлем Кро </span><span>и Томасом Эдисоном - граммафон</span>
1923 год. Джонг Мажер – Изобретение Электрофона и Калейдофона в Берлине
Магнитофон <span>в Берлине в 1935</span>
var x,y:real;
begin
writeln('Введите значение x: ');
readln(x);
if x<0 then
begin
y:=x/2;
writeln('y = ',y);
end
else
begin
if x>=0 then
y:=sqrt(3+x);
writeln('y = ',y);
end;
end.
var
x: array of string;
y: string;
begin
readln(y);
x := y.Split(' ');
y := x[0];
foreach w: string in x do
if (y.Length <= w.Length) then
y := w;
writeln(y);
<span>end.</span>