введите только время ( только часы) и напечатайте соотвествующие этому медли

Введите только время ( только часы) и напечатайте соотвествующие этому медли сообщение:"доброе утро", добросердечный вечер, доброй ночи

Задать свой вопрос
1 ответ
Var h:integer;
begin;
readln(h);
case h of
7..15:writeln('Добросердечное утро');
16..23:writeln('Добрый вечер');
0..6:writeln('Добросердечной ночи');
else writeln('Не часы');
end;
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт