СРОЧНО ПОЖАЛУЙСТАданы стороны 3 х квадратов a,b,c

Question

СРОЧНО ПОЖАЛУЙСТАданы стороны 3 х квадратов a,b,c. Найдите площадь и периметр (понятие подпрограммы. Процедура. Описание. Применение.)

Answer 1

45

nikolas555

21 февраля 2023

Var a, b, c: integer; P1, p, s: real; Begin Readln (a, b, c); If a+b>c then p1: =a+b+c; P: =(a+b+c) /2; S: =sqrt (p*(p-a)*(p-b)*(p-c); Writeln (‘ p1=‘ , p1:5:2); Writeln (‘ s=’,s: 5:2); End. По формуле герон

пользователи выбрали этот ответ лучшим

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

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

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

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