Периметр треугольника. - Pascal
Формулировка задачи:
Составте програму для вычесления периметра прямоугольника
Решение задачи: «Периметр треугольника.»
textual
Листинг программы
Var P,a,b: real;
begin
writeln('vvedite storoni');
readln(a,b)
P:=(2*a)+(2*b);
writeln('perimetr='+ P)
end.
Объяснение кода листинга программы
- Объявляются переменные P, a и b типа real.
- Выводится сообщение
введите стороны, и с помощью функции readln считываются значения сторон a и b. - Вычисляется периметр треугольника по формуле P = (2a) + (2b) и сохраняется в переменной P.
- Выводится сообщение
периметр=с значением P, полученным на предыдущем шаге.