Begin
Writeln('сердечко');
end.
Решение практически "дословное". Учитесь правильно излагать свои мысли и уж тем более чужие вопросы.
3 основных 1)Алгоритмический 2)Бейсик 3)Паскаль
Паскаль-это универсальный язык программирования, позволяющий решать самые разнообразные задачи обработки ниформации.
7. При пересечении - 30,
при объединении - 40+30=70