Var a: integer;beginwriteln ('введите время');readln(a);case a of 0..4: writeln('ночь');5..10: writeln('утро');11..15: writeln('день');16..23: writeln('вечер');else writeln('такого времени нет');end;end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
