Петя и вася игрунковы любят играть в стрелялки. на начальном этапе у них по 10 патронов на брата. вася уже успел потратить некоторое количество патронов. а петя потратил столько, сколько осталось у брата. сколько всего в сумме осталось патронов у братьев ? варианты ответов. нужно выбрать из ответов только один и только правильный: а) 5 б) 10 в) 12 г) 15

так как один потратил неизвестное количество - y, его а брат 10-

procedure TfrmMain.FindFilesOnDisk(Dir : string);

var SR    : TSearchRec;

   Err   : integer;

   i, j  : integer;

   st    : string;

begin

 if (Dir[Length(Dir)] <> '\') then Dir := Dir + '\';

 Err := FindFirst(Dir + '*.*', faAnyFile, SR);

 while Err = 0 do

   begin

     j := 0;

     st := AnsiUpperCase(SR.Name);

     if lbDirs.Items.Count > 0 then //Если в списке есть каталоги

       //Проверить, нет ли среди них

       for i := 0 to lbDirs.Items.Count - 1 do            

         if lbDirs.Items[i] = st then  //найденного

           begin

             j := 1;

             break;

           end;      //if lbDirs.Items[i] = st then

     if j = 0 then

       begin

         if (SR.Name <> '.') and

            (SR.Name <> '..') and

            ((SR.Attr and faDirectory) <> 0) then

           begin

             inc(NumDir);

             DirList.Add(Dir + st);

             frmMain.sbMain.Panels[1].Text := IntToStr(NumDir);

             pbFind.Position := NumDir;

             Application.ProcessMessages;

             FindFilesOnDisk(Dir + SR.Name);

           end;    //if (SR.Name <> '.') and

       end;        //if j = 0 then

     Err := FindNext(SR);

   end;

end;

Объяснение:

Реляционная база данных, созданная в соответствии с проектом канонической модели данных предметной области, состоит из нормализованных таблиц, связанных одно-многозначными отношениями. В такой базе данных обеспечивается отсутствие дублирования описательных данных, их однократный ввод, поддержание целостности данных средствами системы. Связи между таблицами позволяют выполнить объединение данных различных таблиц, необходимое для решения большинства задач ввода, просмотра и корректировки данных, получения информации по запросам и вывода отчетов.

Объяснение:

подписайся(^_^)