Program reshenie;
var a,b:real;
begin
writeln('Введите длину и ширину прямоугольника:'); Readln(a); Readln(b);
if (a=b) then writeln('Прямоугольник является квадратом')
end.
<html>
<head><title>Моя страничка</title></head>
<body>
<table align="center">
<tr><td>
<ul>
<li>Пункт списка</li>
</ul>
</td></tr>
</table>
</body>
</html>
2 вопрос 3 способа 1 из а в з из а в б в д в е в з и внизу также
10102=1⁴0³1²0¹2⁰₂= 1*2⁴+1*0³+1*2²+1*0₁+1*2⁰=16+0+4+0+1=21
1⁶0⁵1⁴1³0²1¹2⁰= 64+0+16+8+1+1=90
Открыть файл/программу. Думаю помог.