По блок схеме составить программу на языке паскаль