Задать вопрос
14 февраля, 16:59

Помогите составить программу с помощью которой можно было бы ввести номер месяца, а программа бы ответила к какому времени года соответствует этот месяц (Паскаль)

+3
Ответы (1)
  1. 14 февраля, 17:56
    0
    Var

    month:integer;

    begin

    write ('Введите номер месяца: ') ;

    readln (month) ;

    if month = 12 or month = 1 or month = 2 then

    writeln ('Зима') ;

    if month > = 3 and month = <5 then

    writeln ('Весна') ;

    if month > = 6 and month = <8 then

    writeln ('Лето') ;

    if month > = 9 and month = <11 then

    writeln ('Осень') ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Помогите составить программу с помощью которой можно было бы ввести номер месяца, а программа бы ответила к какому времени года ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Задание 1. Ввести номер месяца и вывести количество дней в нем, а также число ошибок при вводе. Пример: Введите номер месяца: -2 Введите номер месяца: 11 В этом месяце 30 дней. Вы вводили неверно 1 раз. Задание 2.
Ответы (1)
Ввести слово и число раз (Ввод; паскаль, 3). Вывести это слово так: паскаль паскаль паскаль паскаль паскаль паскаль
Ответы (1)
через паскаль 1 ввести 3 числа, вывести наименьшее 2 ввести номер месяца, вывести название месяца 3 ввести 5 чисел, вывести в порядке убывания
Ответы (1)
Ввести номер месяца и вывести название времени года. Пример: Введите номер месяца 4 весна Напишите программу на языке паскаль
Ответы (1)
Помгите! Программа Паскаль Вопрос 1. Функция служебного слова Var. Вопрос 2. С какими числами можно работать в программе Паскаль? Вопрос 3. Оператор ввода. Как он записывается в Паскаль? Вопрос 4. Функция служебного слова Const. Вопрос 5.
Ответы (1)