Дано время суток, вывести фразу доброе утро, добрый день, добрый вечер, доброй ночи. Паскаль

Question

Информатика

Аполя

13 августа, 01:07

Дано время суток, вывести фразу доброе утро, добрый день, добрый вечер, доброй ночи. Паскаль

+4

Ответы (1)

Знаете ответ?

Ратибор · Answer 1

Program vv; var v: integer; beginwriteln ('Введите время = ') ; readln (v) ; if (v>7) and (v12) and (v4) and (v<24) then writeln ('добрый вечер') else writeln ('Добрый ночи') ; end.

только так