Var N, k, i: integer;
begin
write(' N = ');
readln(N);
k:=0;
for i:=N downto 1 do
k:=k+i*i;
writeln ('k=', k);
end.
1)30*2=60
2)60*1024=61440
3)61440:256=240
Ответ:240 секунд=4 минуты
с помощью интернета люди могут общаться друг с другом
Определим время передачи.
2048 бит/с = 256 байт/с = 0,25 Кб/с
128/0,25=128*4= 512с
Т.е. Файл передается 512с. Теперь узнаем новую скорость.
72/512= 0,140625 Кб/с = 144байт/с
Ответ:
144 байт/с