Запишите в развёрнутой форме числа 749,56(10); 10231(4); 579,2487(12).

10,41232,136. Вроде так,но это не тончо сори!

var

s,s1: real;

k: integer;

begin

s: =10;

k: =1;

while s< 20 do

begin

s: =s*1.1;

k: =k+1;

end;

writeln('в ', k,' день он пробежит 20 км');

s: =10;

s1: =10;

k: =1;

while s< 200 do

begin

s: =s+s1*1.1;

s1: =s1*1.1;

k: =k+1;

end;

writeln('в ', k,' день суммарный пробег превысит 200 км');

end.

16-битной кодировке unicode.

один символ s =16 бит

количество бит текстового файла    к=  51200 бит/с * 10 с= 512000

количество символов к/s=512000/16  =32000