Петя, гена, дима и вова занимаются в детской спортивной школе в разных секциях: гимнастической, баскетбольной, волейбольной и легкой атлетики. петя, дима и волейболист занимаются в одном классе. петя и гена на тренировки ходят пешком вместе, а гимнаст ездит на автобусе. легкоатлет не знаком ни с баскетболистом, ни с волейболистом. кто в какой секции занимается?

Петя - баскетбол
Гена - волейбол
Дима - гимнаст
Вова - легкоатлет

6

Объяснение:

Между населёнными пунктами A, B, C, D построены дороги, протяжённость которых (в километрах) приведена в таблице. Определите длину кратчайшего пути между пунктами A и С. Передвигаться можно только по дорогам, протяжённость которых указана в таблице.

Сколькими можно попасть в пункт С?

Из D в C - 2 км

Из B в С - 5 см

Из А в С - 7 км

Рассмотрим п.D - из А в него 4 километра. В сумме: 2 + 4 = 6 километров.

Рассмотрим п.В - из А в него 2 километра. В сумме: 5 + 2 = 7 километров.

Из п.А в п.С напрямую - 7 километров.

Получается, что сначала надо прибыть из пункта А в пункт D, потом из пункта D в пункт С.

ответ: 6 километров.

Вариант 1
var  str:string;
  A,B,i:integer;
 begin
   write('введите ваш текст');
   readln(str);
   for i:=1 to length(str) do begin
     if (str[i]='А')or (str[i]='а') then a:=a+1;
     if (str[i]='Б')or (str[i]='б') then B:=b+1;
   end;
   if (A+B)=0 then write('нет таких букв') else write ('A= ',A,' Б= ',b);
end.

вариант 3
var  str:string;
  A,B,i:integer;
 begin
   write('введите ваш текст');
   readln(str);
   i:=1;
   while i<=length(str) do begin
    if (str[i]='А')or (str[i]='а') then delete(str,i,1);
    i:=i+1;
    end;
   write(str);
      end.