Скорость модема 64000 бит в секунду.1 символ -8 бит.всего символов 8600.найдите время передачи всех символов

Если условие верное, то 1,075 секунды.

var i,s,p:integer; a:array [1..100] of integer;

begin 

s:=0; p:=0;

writeln('Vvedite masiv a:'); 

for i:=1 to 10 do begin

write('a[',i,']=');

readln(a[i]);

end;

for i:=1 to 10 do begin

if a[i]>0 then s:=s+a[i]; 

end;

s:=s*2;

writeln('Udvoennaya suma polozhitelnih elementov=',s);

writeln('Indexi elementov kotorie bolshe prediduschego:');

writeln;

for i:=2 to 10 do begin

if a[i]>a[i-1] then write(i,', ');

end;

for i:=2 to 10 do begin

if ((a[i]>=0) and (a[i-1]>=0)) or ((a[i]<0) and (a[i-1]<0)) then p:=p+1;

end;

writeln;

if p>0 then writeln('Masiv imeet pari sosednih elementov s odnakovimi znakami') else  writeln('Masiv ne imeet pari sosednih elementov s odnakovimi znakami'); 

readln(s);

end. 

 

Если не соблюдать технику безопасности может возникнуть замыкание и пожар или можно что-либо сломать себе, повредить технику. Основными являются - не вставать по время работы за компьютером, а так же не есть за компьютерным столом/не приносить еду в класс. Неправильная посадка может привести к искривлению и другим многочисленным проблемам, если при неправильной посадке зацепить какой-либо провод можно нанести вред технике и себе. Рекомендаций не знаю сорь, но можешь написать что нельзя есть за столом, раскачиваться на стуле и.т.д