Скорость передачи данных через adsl-соединение равна 256000 бит/c. передача файла через данное соединение заняла 10 секунд. определи размер файла в кбайт

107

127

Посмотреть ответы 2

Ответы на вопрос:

alisiababenkov

Информатика

4,4(97 оценок)

1)25600бит/c = 31,25 kb 2)31,25 *10=312.5kв ответ 312.5 кв

katevina

Информатика

4,7(5 оценок)

========== 1 вариант через строку ========== var n,a,k,sum,i,j: integer; s: string; begin sum: =0; write ('введите количество чисел: '); readln (n); for i: =1 to n do begin write ('введите число: '); readln (a); str(a,s); k: =0; for j: =1 to length(s) do if s[j]='5' then k: =k+1; if k=2 then sum: =sum+a; end; writeln ('sum = ',sum); end. ========== 2 вариант через div и mod ========== var n,a,x,k,sum,i: integer; begin sum: =0; write ('введите количество чисел: '); readln (n); for i: =1 to n do begin write ('введите число: '); readln (a); x: =abs(a); k: =0; while x> 0 do begin if x mod 10 =5 then k: =k+1; x: =x div 10; end; if k=2 then sum: =sum+a; end; writeln ('sum = ',sum); end. ========== пример результата: ========== введите количество чисел: 3 введите число: 550001 введите число: -550000 введите число: 123456 sum = 1