Каково время (в минутах) передачи полного объема данных по каналу связи, если известно, что передано 150мбайт данных, причем первую половину времени передача шла со скоростью 2мбит в секунду, а остальное время — со скоростью 6мбит в секунду?
Пусть t - искомое время в секундах. За первые t/2 секунд была передана информация 2*t/2=t Мбит, за остальные t/2 секунд - информация 6*t/2=3*t Мбит. По условию, t+3*t=4*t=150 Мбайт=150*8=1200 Мбит, откуда t=1200/4=300 c или 300/60=5 мин. ответ: 5 минут.
Var arr: array[1..100] of real; n: integer; sum, op: real; i: integer; begin write('vvedite n '); readln(n); for i : = 1 to n do begin write('vvtdite ',i,'-oe chislo '); readln(arr[i]); end; sum : = 0; for i : = 1 to n do sum : = sum + arr[i]; writeln('summa= ', sum); end.