code:if база_задание_6_R1 then..............end_if;
if база_задание_6_R1 then..............end_if;
UBB.classic™ 6.7.2