Представить приведенные ниже числа в виде вещественных констант без экспонент.
1) -103
2) 105
3) 211,02·104
4) 314·26
5) 256·26
6) 0,26·10-8
7) 10-9
8) 99,9
9) -0,0556
10) -16,301

var i: integer;

begin

for i: =1 to 1000 do

if (i mod 3=0) or (i mod 7=0) then write(i);

end.

иероглифы обозначали целые слова и слоги, их было более 750

t=t ожидание+t передачи

t ожидания= 1024*1024*8/2^20=8сек

t передачи=9мб*1024*1024*8/2^13=9216сек

t=9224 секунды

решает данную и выводит ответ 

program d1; varu: array[1..16] of real; x: array[1..16] of real; i,z: integer; beginx[1]: =5; for i: =2 to 16 dobeginx[i]: =x[i-1]+0.2; end; for i: =2 to 16 dobeginu[i]: =x[i]*2+3; write(u[i],' | ')end; end.