1) На рисунке представлена схема дорог, связывающих города А, Б, В, Г, Д, Е, Ж, З, И, К. По каждой дороге можно двигаться только в одном направлении, указанном стрелкой. Сколько существует маршрутов из А в К, проходящих через город Г? 2) На рисунке представлена схема дорог, связывающих города А, Б, В, Г, Д, Е, Ж, З, И, К, Л. По каждой дороге можно двигаться только в одном направлении, указанном стрелкой. Сколько существует маршрутов из А в Л, проходящих через город Е?
3) На рисунке представлена схема дорог, связывающих города А, Б, В, Г, Д, Е, Ж, З, И, К, Л. По каждой дороге можно двигаться только в одном направлении, указанном стрелкой. Сколько существует маршрутов из А в Л, проходящих через город Д или З?
4) На рисунке представлена схема дорог, связывающих города А, Б, В, Г, Д, Е, Ж, З, И, К, Л. По каждой дороге можно двигаться только в одном направлении, указанном стрелкой. Сколько существует маршрутов из А в Л, проходящих через город Е и К?
5) На рисунке представлена схема дорог, связывающих города А, Б, В, Г, Д, Е, Ж, З, И, К, Л. По каждой дороге можно двигаться только в одном направлении, указанном стрелкой. Сколько существует маршрутов из А в Л, проходящих через город Ж или И?
6) На рисунке – схема дорог, связывающих города А, Б, В, Г, Д, Е, Ж, З, И, К, Л. По каждой дороге можно двигаться только в одном направлении, указанном стрелкой. Сколько существует различных путей из города А в город Л, не проходящих через К?
1)var n:longint; begin readln(n); if n mod 5=0 then writeln('Число N является кратным чилслу 5')else writeln('Чило N не является кратным числу 5' ); end. 2) var a,b,c:longint: begin readln(a,b,c); if (a+b)div 2=c then writeln('Число C является средним арефметическим чисел A и B') else writeln(' Число C является средним арефметическим чисел A и B') else writeln('Число C не является средним арефметическим чисел A и B '); end. 3) var a:longint; begin write('Сколько вам лет?'); readln(a); if a<14 then write('Вам еще рано получать паспорт?') else write('Поздравляю! Вы гражданин России!'); end. 4) var a:extended; begin readln(a); if (a>36)and(a<37) then writeln('Вы здоровы') else writeln('Вы больны'); end.
1)var n:longint; begin readln(n); if n mod 5=0 then writeln('Число N является кратным чилслу 5')else writeln('Чило N не является кратным числу 5' ); end. 2) var a,b,c:longint: begin readln(a,b,c); if (a+b)div 2=c then writeln('Число C является средним арефметическим чисел A и B') else writeln(' Число C является средним арефметическим чисел A и B') else writeln('Число C не является средним арефметическим чисел A и B '); end. 3) var a:longint; begin write('Сколько вам лет?'); readln(a); if a<14 then write('Вам еще рано получать паспорт?') else write('Поздравляю! Вы гражданин России!'); end. 4) var a:extended; begin readln(a); if (a>36)and(a<37) then writeln('Вы здоровы') else writeln('Вы больны'); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
