нужно сделать блок схему по этой программе Program opredeleniesutok; var n:integ Блок схема данные ввод вывод