Нужно сделать блок схему по этой программе

Nina в категроии Информатика, вопрос открыт 07.01.2018 в 15:37

Program opredeleniesutok;
var n:integer;
begin
write('Введите число от 0 до 24 n=');
readln(n);
case n of
0..6:write('ночь');
7..9:write('утро');
10..18:write('день');
else write('вечер');
end;
end.