1. Nima uchun axborot ikkilikda kodlanadi? 2. Sakkiz bit orqali nechta belgini kodlash mumkin?
3. ASCII jadvali haqida ma'lumot bering.
4. ASCII jadvalidan foydalanib, «7-sinf jumlasini kodlang.
5. Axborotning qanday o'lchov birliklari bor?
6. Axborot hajmining o'lchov birliklari haqida ma'lumot bering.
7. Axborot uzatish tezligi deganda nimani tushunasiz?
8. Axborot uzatish tezligining o'lchov birliklari haqida ma'lumot
bering
9. Grafik axborotlarni kodlash haqida ma'lumot bering.
10. Ikki, uch va to'rt bit bilan necha xil rangni kodlash mum-
kin va bu qanday amalga oshiriladi?​

Всё сделано, принимайте работу)))

Объяснение:

Задача №1:

var a: array [1..100] of integer;

i,ch :integer;

begin

  ch:= 0;

  for i:= 0 to 8 do

      begin

          a[i]:= 4 + i*5;

          writeln(i+1,'. x = ',a[i],'   --   ',a[i]*a[i]);

      end;

end.

Задача №2:

var a: array [1..100] of integer;

i,ch :integer;

begin

  ch:= 0;

  for i:= 0 to 9 do

      begin

          a[i]:= 3 + i*3;

          writeln(i+1,'. x = ',a[i],'   --   S = ',a[i]*a[i]*Pi:0:4);

      end;

end.

Задача №3:

var x,i,a :integer;

begin

writeln('x = ');

readln(x);

a:= 1;

for i:= 1 to x do

   begin

       a:= a*i;

   end;

writeln('x! = ',a);

end.

Const
  n = 10;

var
  i, k, j: integer;
  a: array[1..n] of integer;

begin
  Write('Введите через пробел девять целых чисел в порядке возрастания: ');
  for i := 1 to n - 1 do Read(a[i]);
  Write('Введите целое число для вставки: '); Read(k);
  {Определим позицию для вставки}
  i := 1;
  while (k > a[i]) and (i < n) do i := i + 1;
  {Выполним сдвиг бОльших элементов вправо}
  for j := n - 1 downto i do a[j + 1] := a[j];
  {Осуществим вставку}
  a[i] := k;
  {Контрольный вывод}
  Writeln('Результирующий массив');
  for i := 1 to n do Write(a[i], ' ')
end.

Тестовые решения:
Введите через пробел девять целых чисел в порядке возрастания: 3 6 8 10 14 15 17 19 24
Введите целое число для вставки: 25
Результирующий массив
3 6 8 10 14 15 17 19 24 25

Введите через пробел девять целых чисел в порядке возрастания: 3 6 8 10 14 15 17 19 24
Введите целое число для вставки: 0
Результирующий массив
0 3 6 8 10 14 15 17 19 24

Введите через пробел девять целых чисел в порядке возрастания: 3 6 8 10 14 15 17 19 24
Введите целое число для вставки: 13
Результирующий массив
3 6 8 10 13 14 15 17 19 24