6. грунтовая дорога проходит последовательно через населен
ные пункты a, b, c и d. при этом длина грунтовой дороги
между а и в равна 40 км, между в и c 25 км, и меж
ду c и d - 10 км. между a и d дороги нет. между а и
с построили новое асфальтовое шоссе длиной 30 км. оцени
те минимально возможное время движения велосипедиста из
пункта а в пункт в, если его скорость по грунтовой доро
ге - 20 км/ч, по шоссе - 30 км/ч.​

паскаль

откомпилирован в: pascal abc

program z1; uses crt; var    s: string;     c: char;     i: integer; begin        write('  vvedite strocy:   ');         readln(s);                 writeln();                 write(' vvedite sivol dl poiska:   ');         readln(c);                 writeln();         for i : = 1 to length(s) do         if s[i] = c then //        begin                  writeln(' simvol prinadlech stroce = ', s);                   break;         end;         if s[i] < > c then writeln(' simvola net v stroke = ', s); end.

var a: integer;

begin

writeln ('vvedite nomer mesuaca');

read (a);

if (a=1) then writeln ('30');

if (a=2) then writeln ('28');

if (a=3) then writeln ('30');  

  if (a=4) then writeln ('31');  

  if (a=5) then writeln ('30');  

  if (a=6) then writeln ('31');  

  if (a=7) then writeln ('30');  

  if (a=8) then writeln ('31');  

  if (a=9) then writeln ('30');  

  if (a=10) then writeln ('31');  

  if (a=11) then writeln ('30');  

  if (a=12) then writeln ('31');  

end. 

6, понедельник, иа, 1, на печи,клюв, царь, марка, гласных 10, согласных 21, всего 33

они будут меньше, быстрее, умнее и, если верить рекламе программного обеспечения, дружественнее.