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

на c есть смысл писать? усвоишь метод?

Да

Могу написать на паскале, написать?

Буду очень благодарна)

Var a:integer;
Begin
  Write('Введите номер месяца: '); readln(a);
case a of
1:writeln('Январь - Зима');
2:writeln('Февраль- Зима');
3:writeln('Март- Весна');
4:writeln('Апрель- Весна');
5:writeln('Май- Весна');
6:writeln('Июнь-Лето');
7:writeln('Июль- Лето');
8:writeln('Август- Лето');
9:writeln('Сентябрь-Осень');
10:writeln('Октябрь -Осень');
11:writeln('Ноябрь- Осень');
12:writeln('Декабрь - Зима');
else writeln('Введено не верное число. Введите число от 1 до 12');
end;
end.


Или упрощённый вариант:
Var a:integer;
Begin
Write('Введите номер месяца: '); readln(a);
case a of
1..2:writeln('Зима');
3..5:writeln('Весна');
6..8:writeln('Лето');
9..11:writeln('Осень');
12:writeln('Зима');
else writeln('Введено не верное число. Введите число от 1 до 12');
end;
end.

Int mesyac;
Console.WriteLine("Введите месяц:");
mesyac = Convert.ToInt32(Console.ReadLine());
if (mesyac == 12 mesyac == 1 mesyac == 2)

Console.WriteLine("Зима");

if (mesyac gt; 2 amp;amp; mesyac =lt; 5)

Console.WriteLine("Весна");

if (mesyac gt; 5 amp;amp; mesyac =lt; 8)

Console.WriteLine("Лето");

if (mesyac gt; 8 amp;amp; mesyac =lt; 11)

Console.WriteLine("Осень");

Console.ReadKey());