<body>
<p>
<font color="blue"> Декабрь, январь, и февраль – зимние месяцы.</font>
</p>
<p>
<font color="green"> Март, апрель и май – весенние месяцы. </font>
</p>
<p>
<font color="yelow"> Июнь, июль и август – летние месяцы. </font>
</p>
<p>
<font color="orange"> Сентябрь, октябрь, ноябрь – осенние месяцы. </font>
</p>
Объяснение:
<font color="..."> Вместо троиточия код цвета можешь поставить </font>
<p>Это абзац</p>
<body>
<p>
<font color="blue"> Декабрь, январь, и февраль – зимние месяцы.</font>
</p>
<p>
<font color="green"> Март, апрель и май – весенние месяцы. </font>
</p>
<p>
<font color="yelow"> Июнь, июль и август – летние месяцы. </font>
</p>
<p>
<font color="orange"> Сентябрь, октябрь, ноябрь – осенние месяцы. </font>
</p>
Объяснение:
<font color="..."> Вместо троиточия код цвета можешь поставить </font>
<p>Это абзац</p>
var
s1,s2:string;
d:integer;
begin
Write('Первая строка: '); Readln(s1);
Write('Вторая строка: '); Readln(s2);
d:=Length(s1)-Length(s2);
if d>0 then Writeln('Первая строка длиннее на ',d)
else
if d<0 then Writeln('Вторая строка длиннее на ',-d)
else Writeln('Строки имеют равную длину')
end.