Оформите в виде процедур алгоритмы рисования букв М, И, Р. Составьте

ПРОЦ буковка_ М ПРОЦ буковка _ И
НАЧАЛО НАЧАЛО
Двинуть на вектор (1;1) Двинуть на вектор (0;4)
Опустить перо Опустить перо
Сдвинутиь на вектор (0;4) Двинуть на вектор (0;-4)
Двинуть на вектор (1;-2) Двинуть на вектор (2;4)
Сдвинуть на вектор (0; -4) Двинуть на вектор (0;-4)
Подними перо Подними перо
Двинуть на вектор (1;0) Двинуть на вектор (1;0)
КОНЕЦ КОНЕЦ

ПРОЦ буковка Р
НАЧАЛО
Опустить перо
Двинуть на вектор (0;4)
Двинуть на вектор (2;0)
Двинуть на вектор (0;-2)
Сдвинуть на вектор (-2;0)
Подними перо
Двинуть на вектор (3;-2)
КОНЕЦ