Составить программу нахождения периметра треугольника

Задание:

Составить программу нахождения периметра треугольника. Написать допустимые именапеременных

Решение:

Uses crt; var a,b,c,p: integer; begin writeln ('Введите стороны треугольника: '); readln (a,b,c); P: =a+b+c; writeln ('Периметр треугольника: ',P); end.

Знаете другой ответ?

Отправить свой ответ