Например, вот две программы

1) сердечко, только контур:

использовать Чертежник

цел з,т=1871

вещ а,б

алг

нач

выбрать чернила (красный)

нц для з от -1 до 1 шаг 2

нц для т от -т до т

а:=т/500

б:=0.8*((а*а)**(1/3)+з*sqrt(max(14-а*а,0)))

сместиться в точку (а,б)

опустить перо

кц

поднять перо

кц

сместиться в точку (0,10)

кон

2) сердечко с закраской:

использовать Чертежник

цел т=1871

вещ а,б,в

алг

нач

выбрать чернила (красный)

нц для т от -т до т

а:=т/500

б:=0.8*(а*а)**(1/3)

в:=0.8*sqrt(max(14-а*а,0))

сместиться в точку (а,б-в)

опустить перо

сместиться в точку (а,б+в)

поднять перо

кц

сместиться в точку (0,10)

кон