Руппа объектов. Общее название Цели урока: иметь начальное представление
об общих именах, обозначающих группу объектов; уметь называть отдельные
предметы заданной группы и давать общее имя группе объектов; уметь
давать разные общие имена одному объекту.
Вот вроде так, попробуйте
Readln(n);
If (n>0)
write (n*n);
else
weite(0);
Видимо, 0 нельзя вводить?
Ответ:
Дан в приложении.
Объяснение:
Я опирался на теорему Пифагора: в прямоугольном треугольнике квадрат гипотенузы равен сумме квадратов двух катетов.
А для нахождения площади была использована формула Герона:
![S=\sqrt{p*(p-a)*(p-b)*(p-c)} ;p=(a+b+c)/2](https://tex.z-dn.net/?f=S%3D%5Csqrt%7Bp%2A%28p-a%29%2A%28p-b%29%2A%28p-c%29%7D+%3Bp%3D%28a%2Bb%2Bc%29%2F2)