Var
a,b,c:integer;
x,y,z:string;
begin
writeln('Введите стороны треугольника');
readln(a,b,c);
x:='равнобедренный';
y:='равносторонний';
z:='разносторонний';
begin
if (c=b) and (a<>c) then
writeln('Треугольник',' ',x);
if (a=c) and (a<>b) then
writeln('Треугольник',' ',x);
if (a=b) and (a<>c) then
writeln('Треугольник',' ',x);
if (a=b) and (a=c) and (b=c) then
writeln('Треугольник',' ',y);
if (a<>b) and (a<>c) and (b<>c) then
writeln('Треугольник',' ',z);
end;
readln
<span>end.</span>
Изображения нет, но я могу объяснить как решать такой тип задач.
Здесь применяется теория графов. Если не углубляться, то там всё предельно ясно и просто.
Нужно изобразить граф: рисуем по кругу точки (вершины графа), называем их (можно не просто точки рисовать, а кружки и в кружках букву населенного пункта писать). Потом соединяем между собой точки у которых есть связь и подписываем "вес" (расстояние между населенными пунктами) этого пути. Визуально может не соответствовать длинна, но для нас потом главное просчитать какой из возможных путей наберет наибольший "вес".
Если что-то непонятно, спросите в комментариях.
Компьютер-незаменимая вещь в любой профессии.Учитель,доктор,экономист,во всех этих профессия не обходим компьютер.Можно сказать,что компьютер,работает"Разнорабочим и при чём во всех профессиях."Компьютер-универсальная машина для работы с информацией.Он может работать с информацией,с приложениями(рисовать рисунки или решать вычесления).Он не обходим любому человеку!
Надеюсь понравится!
Для записи результата одного спортсмена требуется log(2)12≈4 бита (2^4=16). Объем информации о финише 2/3 спортсменов = 4*12*2/3 = 32 бита = 4 байта.
Представим 135 по основанию х в расширенной записи.
1·x²+3·x+5 = 59
x²+3x-54=0
D=3²-4·1·(-54)=9+216=225; √225=15
x₁=(-3-15)/2 < 0 не подходит
x₂=(-3+15)/2=6
Проверка 6²+3·6+5=36+18+5=59