1. Ақпараттың ең кіші бөлігі қалай аталады? 2. Деректер жіберу жылдамдығы деген не?
3. Хабардың ақпараттық көлемі деген не?
4. Ақпарат тасымалдаушы құрылғының сыйымдылығы несімен маңызды?
5. Ақпаратты бір өлшем бірлігінен екінші өлшем бірлігіне өткізу реті қандай?
6. Әртүрлі дереккөздердегі (газет, журнал, кітап) ақпараттың өлшемін анықтау әдісі қандай?
7. Әртүрлі өлшем бірліктерінің қандай ортақ қасиеттері бар?
Тапсырма
1. 6 Мб ақпаратты байт, Кб-та өрнекте.
2. Кітаптағы 110 Мб ақпаратты «Информатика» сөзінің қаншасымен ауыстыруға болады?
3. Толық тегің, атың қанша бит және байт болатынын есепте.
4. 1 Гб ақпаратты желіде 512 секунд ішінде тасымалдасақ, онда ақпаратты жеткізу жылдамдығы қандай
1) ответ: 12
a 1 2 3
b 1 2 4
2) ответ: i = 30
3) ответ: б), потому что условие проверяется перед началом работы очередного круга цикла.
3 (???) ) ответ: 2 раза. В ходе работы цикла переменная p должна стать равной 0.02
4) ответ: г)
Какое тут должно быть объяснение? Всё прекрасно видно, если посмотреть на саму задачу! Сначала i равен нулю, потом ему прибавляется в значении по единице, пока i не станет равным пяти (0,1,2,3,4,5). Итого к S прибавляется единица шесть раз.
Снизу практически анологично. Это максимально тупо, что просите объяснения к таким простым вопросам.
5) ответ: г)
Какое тут должно быть объяснение? Всё прекрасно видно, если посмотреть на саму задачу! Сначала i равен -1, потом ему прибавляется в значении по единице, пока i не станет равным 2 (-1,0,1,2). Итого к S прибавляется единица 4 раза.
program raf105;
var
a:array[1..20] of integer;
i,min: integer;
begin
min:= 10000;
writeln('Исходный массив:');
for i:=1 to 20 do
begin
a[i]:= random(-30,20);
writeln(a[i]);
if a[i]<min
then min:= a[i];
end;
writeln('Изменённый массив:');
for i:=1 to 20 do
begin
if (a[i] mod 2)<>0
then a[i]:= min;
writeln(a[i]);
end;
end.
Заменить нечётные элементы по индексуprogram raf105;
var
a:array[1..20] of integer;
i,min: integer;
begin
min:= 10000;
writeln('Исходный массив:');
for i:=1 to 20 do
begin
a[i]:= random(-30,20);
writeln(a[i]);
if a[i]<min
then min:= a[i];
end;
writeln('Изменённый массив:');
for i:=1 to 20 do
begin
if (i mod 2)<>0
then a[i]:= min;
writeln(a[i]);
end;
end.
Язык PascalABC