1) 3072*8 = 24576 Кбит
2) 4*1024 = 4096 Кбит/с
3)24576 / 4096 = 6с - ответ
Ответ:
236(16) =1000110110(2) =1066(8)
Var s:string; p:integer;
begin
writeln('Введите строку:');
readln(s);
p:=pos('ба',s);
if p>0
then
begin
while p>0 do begin delete(s,p,2); insert('ро',s,p); p:=pos('ба',s); end;
writeln(s);
end
else writeln('В строке нет слогов "ба"');
end.
Пример:
<span>Введите строку:
база
роза</span>
var a:array[1..15] of char;
i,min,max:integer;
Begin
min=1;
max=1;
for i:= 1 to 15 do begin
a[i]:= chr(random(256));
if a[min]>a[i] then min:=i;
if a[max]<a[i] then max:=i;
end;
writeln(a[min], a[max]);
End.
Числовые типы — типы данных, выражающие число. Притом как целое, так и дробное.
Но НЕ строку, содержащую название или обозначение числа.
Следовательно, подходят только 1; 5; 6.
Остались ненужные нам типы:
4 — логический тип (булевый)
2, 3, 7 — строковый тип (текст)
Ответ: 1; 5; 6