дано время суток,вывести фразу доброе утро,добрый день,добрый вечер,доброй ночи. Паскаль
Answers & Comments
Hostrider
Program vv;var v: integer;beginwriteln ('Введите время =');readln (v);if (v>7) and (v<12) then writeln ('Доброе утро');if (v>12) and (v<4) then writeln ('добрый день');if (V>4) and (v<24) then writeln ('добрый вечер')else writeln ('Добрый ночи');end. только так
Answers & Comments
только так