Ли
Лилия

Программирование в Pascal ABC-2

Помогите пожалуйста решить задачу:
2.Введите номер месяца. Напечатайте соответствующее месяцу время года: «зима» , «весна» , «лето» , «осень» .

и объясните в решении что означают некоторые элементы

AK
Albert Kulumbetov

begin
writeln('Введите номер месяца');
read(a);
if (a>=12) and (a<=2) then
writeln('зима')
else if (a>=3) and (a<=5) then
writeln('весна')
else if (a>=6) and (a<=8) then
writeln('Лето')
else writeln('осень');
end.

EV
Eva Vard

я не понял, нужно, чтобы при вводе номера месяца, она выдавала какой месяц прописью?

Елена Кочергина
Елена Кочергина

примени CASE и все будет

ОИ
Оксана Ивасюк-Наумова

const s:array[0..3]of string[5]=('зима','весна','лето','осень');
var a:integer; begin readln(a); writeln(s[ a div 3 mod 4]); readln end.

Похожие вопросы
Программирование Pascal
программирование в Pascal
Программирование на pascal abc
Помогите пожалуйста решить задачи по программированию на Pascal ABC. (оплачу)
Pascal ABC Процедуры
програмирование на Pascal ABC
Программирование в Pascal ABC
программирование Pascal ABC! спасибо!
программирование в pascal
Pasal abc Подскажите как установить pascal программу программирования на iPad.беспоатно без джейлбрека