Pascal! Даны основания и высота р/б трапеции. Найти ее периметр!

Question

78

Pascal! Даны основания и высота р/б трапеции. Найти ее периметр!

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

pentax · Accepted Answer

36

pentax

09 марта 2023

Пробуйте: var a,b,h: integer; p: real; beginwrite ('Введите длину большего основания: '); read (a); write ('Введите длину меньшего основания: '); read (b); write ('Введите длину высоты: '); read (h); p: =a+b+2*sqrt (sqr (h)+sqr (a-b) /4); writeln ('Периметр=',p); end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: