Привет, Ребята, а мне нужна помощь, у нас программа Pascal ABC. Пиши правильнее, ибер...

0 голосов
39 просмотров

Привет, Ребята, а мне нужна помощь, у нас программа Pascal ABC. Пиши правильнее, ибер ошибок


image

Информатика (38 баллов) | 39 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

1) var v: integer;

begin

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

readln(v);

if (v=12) or (v=1) or (v=2) then

writeln('Ваше время года: Зима.')

else

if (v=3) or (v=4) or (v=5) then

writeln('Ваше время года: Весна.')

else

if (v=6) or (v=7) or (v=8) then

writeln('Ваше время года: Лето.')

else

if (v=9) or (v=10) or (v=11) then

writeln('Ваше время года: Осень.')

else

end.

(6.1k баллов)
0

Спасибо Ещё раз

0

пожалуйста