Скорость передачи данных через adsl-соединение равна 512000бит/с. передача файла через данное соединение заняла 8 секунд. определите размер файла в кбайтах
Uses crt;var a,b,c,d,g,i,k,l,z,x,m,n,q:real;beginwriteln('введите число тон');readln(a);writeln('введите число ');readln(b);writeln('введите число ');readln(c);writeln('введите число ');readln(d);writeln('введите число ');readln(g);writeln('введите число ');readln(i);writeln('введите число ');readln(k);writeln('введите число ');readln(l);writeln('введите число ');readln(n);writeln('введите число ');readln(m);writeln('введите число ');readln(z);writeln('введите число ');readln(x);q:=a+b+c+d+g+i+k+l+z+x+m+n;writeln('Обща маса',q:10:2);end.
Const n=20; var a:array [1..n] of integer; k,i:integer; begin writeln('Исходный массив:'); for i:=1 to n do begin a[i]:=random(90)+10; write(a[i],' '); end; writeln; k:=0; for i:=1 to n do if a[i] mod 2 = 0 then k:=k+1; writeln('В массиве ',k,' четных чисел'); writeln('Элементы с нечетными номерами:'); for i:=1 to n do if i mod 2 <> 0 then write(a[i],' '); end.
4096000/8 = 512000
512000/1024 = 500
ответ: 500 кбайт
или
512000/8 = 64000
64000/1024=62.5
62.5*8=500
1 кбайт = 1024 байт
1 байт = 8 бит