Написатьпрограмму, которая спрашивает Который час? и, в зависимости от введенноговремени,

Написать
программу, которая спрашивает Который час? и, в зависимости от введенного
времени, выводит на экран приветствие: Благое утро, Добрый денек, Добросердечный
вечер, Спокойной ночи.

Задать свой вопрос
Валя
паскаль 
1 ответ
Program z1;
var a:real;
begin
writeln('Который час?');
read(a);
if (agt;=6) and (alt;12) then writeln('Доброе утро') else
begin
if (agt;11) and (alt;=16) then writeln('Добросердечный денек') else
begin
if (agt;16) and (alt;=22) then writeln('Добросердечный вечер') else
begin
if (agt;22) or (alt;6) then writeln('Спойкойной ночи') end; end; end; 
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт