1. универсальное техническое средство для работы человека с информацией.
2. последовательность действий (команд), которую должен выполнить компьютер, чтобы решить поставленную .
3. устройство запоминания.
4. другое название внутренняя память.
5. устройство обработки информации.
6. порядковый номер байта во внутренней памяти компьютера.

program xxx; var i, j, k, n, p, s : integer;       a : array [1..20] of integer; begin  write ('введите количество инверсий -');   readln(k);   write ('введите количество ламп -');   readln(n);   for i: =1 to n do      a[i]: =0;   for i: =1 to k do      begin          write ('введите инверсию p-');           readln(p);           j: =p;           while j< =n do              begin                  if a[j]=0 then a[j]: =1 else a[j]: =0;                   j: =j+p              end      end;   s: =0;   for i: =1 to n do      if a[i]=1 then s: =s+1;   write ('ламп горит -', s);   readlnend.

если переменная нужна целая то так:

x: =random(b-a)+a

если можно дробную, то так

x: =(b-a)*random+a

программа №4program str999; uses crt; var s: string; begin writeln('введіте фразу'); read(s); if (s='край озер') then writeln ('край озер лесов и рек'); if (s='я учусь в школе') then writeln ('я учусь в 10-м классе') end. №5program p_1; uses crt; var s: string; begin writeln('введите фразу'); read(s); if (s='моя родина беларусь') then writeln ('беларусь моя родина'); if (s='люблю цябе мой родны кут') then writeln ('мой родны кут люблю цябе')  end. 

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

readln;

end.