Program p;
var
a,b,c,s: integer;
begin
writeln('введите длину:');
readln(a);
writeln('введите диагональ:');
readln(c);
b := sqrt((sqr(c) - sqr(a)));
s := a * b;
writeln('площадь прямоугольника: ', s);
end.
1.в конверте есть письмо
2.нет приглашения, есть письмо
Двоичная: 1000000001, 1001011000, 100001010, 10000111111100
Шеснадцатиричная: 201, 258, 10а, 21fc
Восьмиричная: 1001, 1130, 412, 20774
<span>
</span>