В среде Паскаль АБС составить программу по блок схеме
Если я ничего не путаю то на блок схеме изображено условие IF и тогда программа будет выглядеть как у меня на скрине