Напишите программу на языке паскаль по данной блок схеме