Между населенными пунктами A, B, C, D, E, F построены дороги, протяженность которых (в километрах) приведена в таблицах. Определите длину кратчайшего пути между пунктами A и F. Передвигаться можно только по дорогам, указанным в таблице.
// PascalABC.NET 3.2, сборка 1381 от 04.02.2017 // Внимание! Если программа не работает, обновите версию!
begin var age:=ReadInteger('Введите возраст:'); var gender:=ReadInteger('Введите пол (1-М, 2-Ж):'); if gender=1 then case age of 0..13:Writeln('Мальчик'); 14..20:Writeln('Юноша'); 21..70:Writeln('Мужчина'); else Writeln('Старец') end else case age of 0..13:Writeln('Девочка'); 14..20:Writeln('Девушка'); 21..70:Writeln('Женщина'); else Writeln('Старушка') end end.
1) 8
A - B - C -D - E - F.
Объяснение: