Помогите срочно!!!Завтра нужно сдавать,очень подробно нужно Скорость передачи данных по некоторому каналу связи равна 32 768бит/
Помогите срочно!!!Завтра нужно сдавать,очень подробно нужно Скорость передачи данных по некоторому каналу связи равна 32 768бит/ с. Передача текстового файла по этому каналу связи заняла 15 с.Определите ,сколько страниц содержал переданный текст ,если известно ,что информационный вес одного символа равен 8 битам , а на одной странице 48 символов.
Program n1; var sum,kp,ko,a: integer; begin readln(a); sum:=0; ko:=0; kp:=0; while a<>0 do begin sum:=sum+a; if a>0 then kp:=kp+1 else ko:=ko+1; readln(a); end; writeln(sum); writeln(kp-ko); end.