Подсчитайте в переменной s сумму чисел 4/5; 12/5; 20/5; 28/5; 36/5 и так далее до тех пор, пока сумма не превысит 19.Написать блок схему и программу на паскаль используя цикл ДО

program Sum_chisel;var s: real; n: integer;begins := 0;n := 4;repeats := s + n/5;n := n + 8;until s > 19;writeln('сумма=', s)end.