.

​

//pascal abc.net 3.1 сборка 1256 var   a,b,c,s,p: real; begin readln(a,b,c); if (a+b> c) and (b+c> a) and (a+c> b) then   begin   p: =(a+b+c)/2;   s: =sqrt(p*(p-a)*(p-b)*(p-c));   writeln('s=',s);   end   else   writeln('такого треугольника не существует.'); end. пример ввода: 3 4 3 пример вывода: s=4.47213595499958

n = 2^i

n = 2^5 = 32

ответ. в классе 32 ученика

56 кбит/с = 56000 бит/с (в скорости предачи данных обычно 1кбит/с = 1000 бит/с )

 

посчитаем кол-во данных, которые передали за 5 секунд:

56000 бит/с * 5 с = 280000 бит

 

в обычной кодировке один символ занимает один байт (то есть 8 бит)

посчитаем количество переданных символов текста:

280000 бит / 8 = 35000 символов

var i: integer;

s: string;

begin

  s: ="abcdefghijklmnopqrstuvwxyz";

  for i: = 1 to length(s) do

      writeln(s[i],' = ', ord(s[i]));

end.