Program by_Relhem;
var a,b,c,S:real;
begin
writeln ('Введите гипотенузу и катет, разделяя их пробелом');
read (a,b);
if a>b then
c:=sqrt(sqr(a)-sqr(b));
if b>a then
c:=sqrt(sqr(b)-sqr(a));
S:=0.5*(a*b);
writeln ('Катет: ',c, ' Площадь: ',S);
end.
<span>Поименованное сложное действие, которое представляет собой совокупность операторов,вычисляющих некоторое число результатов в зависимости от некоторого числа аргументов называют - ПРОЦЕДУРОЙ.</span>
Ответ:
не понятно ничего..........
ПО это Программное Обеспечение. Его установка запрашивается при установке игры, потому что то ПО что с ней устанавливается является оптимальным для нее (по мнению разработчиков).
Var n, i, sum: integer;
begin
read(n);
sum := 0;
for i:=1 to n do
sum := sum + (2*i-1);
writeln(sum);
end.