Program program1; var a, b, c, p: real; begin write('Введите длины сторон треугольника: '); readln(a, b, c); p := a + b + c; writeln('Периметр треугольника со сторонами ', a, ', ', b, ' и ', c, ' равен ', p); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
