Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1)
var
s: string;
begin
s: ='пробел';
writeln(s);
delete(s,4,1);
insert('д',s,4);
end.
2)
i: integer;
a,b: string;
readln(a);
b: ='';
for i: =1 to length(a) do
b: =b+a[i]+' ';
writeln(b);
3)
a: string;
if a[2]=a[4] then writeln('равны')
else writeln('не равны');
t=t ожидание+t передачи
t ожидания= 1024*1024*8/2^20=8сек
t передачи=9мб*1024*1024*8/2^13=9216сек
t=9224 секунды
program fasf;
n,q: integer;
write('введите этаж: ');
readln(n);
q: =n*4;
writeln('квартиры: ',q,q-1,q-2,q-3);
4мин=240 сек.
1 половина всего времени = 240/2=120 сек.
за перпую половину времени передалось = 120 сек * 117 кбит = 14040 кбит
за вторую половину времени передалось в 3 раза меньше (т.к. скорость была в 3 раза меньше) = 14040/3=4680 бит
всего передалсоь = 14040+4680=18720 кбит = 2340 кбайт
Популярные вопросы