Скорость передачи данных через adsl-соединение равна 1 000 000 бит\с. через данное соединение файл размером 100мбайт. определите время передачи файла в минутах. ,

(100 * 1024 * 1024 * 8) / 1000000 = 839 сек = 14 мин

все округлено в большую сторону

1. короткий вариант // pascalabc.net 3.1, сборка 1230 от 27.04.2016 begin   var a: =1.to(10).select(x-> x*x*x).toarray; a.println;   writeln('s=',a[0]+a[4]+a[9]) end. результат 1 8 27 64 125 216 343 512 729 1000 s=1126 2. школьный вариант // pascalabc.net 3.1, сборка 1230 от 27.04.2016 var   i: integer;   a: array[1..10] of integer; begin   for i: =1 to 10 do begin       a[i]: =i*i*i;       write(a[i],' ')       end;   writeln;   writeln('s=',a[1]+a[5]+a[10]) end.

Var       a: array[1..100] of integer;       i, n, s: integer; begin       readln(n);       s : = 0;       for i : = 1 to n do       begin               a[i] : = random(50) - 40;               write(a[i], ' ');               s : = s + a[i];       end;             writeln;       writeln('s = ', s); end.