Составить программу, которая выводит символы с от 60 до 70

// pascalabc.net 3.3, сборка 1542 от 05.10.2017 // внимание! если программа не работает, обновите версию! begin   var n: =8;   var a: =new real[n,n];   var k: =1;   for var i: =0 to n-1 do       for var j: =0 to n-1 do begin           if i.iseven then a[i,n-1-j]: =k           else a[i,j]: =k;           k+=1           end;   a.println(3,0) end. результат   8  7  6  5  4  3  2  1   9 10 11 12 13 14 15 16   24 23 22 21 20 19 18 17   25 26 27 28 29 30 31 32   40 39 38 37 36 35 34 33   41 42 43 44 45 46 47 48   56 55 54 53 52 51 50 49   57 58 59 60 61 62 63 64

Всё элементарно! давайте посчитаем скорость передачи без сжатия: объём файла: 60мб скорость передачи: 222бит/сек для начала переведем 60мб в биты: 60*1024 = 61440 кбт 61440*1024=62914560 байт 62914560*8=503316480 бит а теперь посчитаем за сколько времени передастся файл без сжатия: 503316480/222= 2267191,35 секунд отлично, теперь получим размер сжатого файла: 503316480*0,7=352321536 бит а передастся файл за: 352321536/222=1587033,95 секунд но мы не учли скорость архивации и разархивирования: 1587033,95 + 15 + 7 =  1587055,95 секунд ну и видно, что файл даже с временем на сжатие будет передан быстрее.