Паскаль
Составить программу, в которой необходимо создать базу данных, состоящую из трех полей. Далее организовать поиск по всем полям. В программе учитываем, корректность ввода данных в зависимости от назначения поля. Дать право пользователю выбирать по какому полу осуществить поиск. А затем с Желает ли пользователь повторить поиск или закончить выполнение программы. "

Const 
n=5;

Var
 ar:array[1..n] of integer;
 ar2:array[1..n] of integer;
 i,k:integer;

 function prost(a:integer):boolean;
 var i:integer;
 b:boolean;
  begin
  b:=true;
   for i:=2 to a div 2 do
    if a mod i=0 then
     begin;
      b:=false;
      break;
     end;
   if a=1 then b:=false;
  prost:=b;
 end;

  begin;
 randomize;
 k:=0;
  for i:=1 to n do
   begin;
    ar[i]:=random(101);
    write(ar[i]:4);
   end;
  writeln;
  for i:=1 to n do
  if prost(ar[i]) then
   begin;
    inc(k);
    ar2[k]:=ar[i];
    write(ar2[k]:4);
   end;
end.

ответ:

американский инженер и , его работы являются синтезом идей с конкретным анализом чрезвычайно сложных проблем их технической реализации  

он является основателем теории информации, нашедшей применение в современных высокотехнологических системах связи. шеннон внес огромный вклад в теорию вероятностных схем, теорию автоматов и теорию систем — области наук, входящие в понятие «кибернетика». в 1948 году предложил использовать слово «бит» для обозначения наименьшей единицы информации (в статье « теория связи»).

объяснение:

клод шеннон является одним из создателей теории информации. именно он придумал такую единицу информации как бит.