Составьте блок-схему и программу следующей задачи. Бригада из семи рабочих заработала М р.Деньги были поделены поровну. Найдите заработок каждого рабочего.
Var n,M:integer; zar:real; begin write('ведите заработок бригады'); Read(M); n:=7; zar:=M/n; write(zar);end.
