Это невозможно. Ведь есть вероятность того,что карты рубашкой вверх не будут в 2 группах одинакового количества.
<span><span /><span><span>
x
x1
</span><span>
2.00
2.69
</span><span>
2.20
3.99
</span><span>
2.40
5.37
</span><span>
2.60
6.74
</span><span>
2.80
7.95
</span><span>
3.00
8.92
</span><span>
3.20
9.59
</span><span>
3.40
9.94
</span><span>
3.60
10.02
</span><span>
3.80
9.90
</span><span>
4.00
9.71
</span></span></span>
3 ноября 1962 года <span>Гейб Ньюэлл
А курица учённые ещё не определились когда родилась курица .</span><span />
Побольше обьяснений, а пока напишу так:
var A:integer;
begin
Writeln('Введите температуру, в зимнее время');
Readln(A);
If A>0 then
Writeln('Метеорологическая весна наступала')
else
Writeln('Метеорологическая весна не наступала');
end.