Ответы
Ответ дал:
0
Program Treug;
Var a,b: real;
Begin;
writeln('Введите a и b');
readln(a,b);
writeln('Площадь треугольника: ' a*b);
writeln('Периметр треугольника:' 2*(a+b);
End.
вот легкий код
Var a,b: real;
Begin;
writeln('Введите a и b');
readln(a,b);
writeln('Площадь треугольника: ' a*b);
writeln('Периметр треугольника:' 2*(a+b);
End.
вот легкий код
Вас заинтересует
1 год назад
1 год назад
2 года назад
8 лет назад
8 лет назад
8 лет назад