• как ввести номер месяца и вывести название времени года на языке Паскаля

Ответы 1

  • Можно так:Program VremjaGoda;Var i:integer;Begin Writeln ('введите номер месяца'); Begin For i:=1 to 12 do Begin If i=1 or i=2 or i=12 Then writeln ('зима'); Else If i=3 or i=4 or i=5 Then writeln ('Весна'); Else If i=6 or i=7 or i=8 Then writeln ('Лето'); Else If i=9 or i=10 or i=11 Then writeln ('Осень');End;End;End.Можно использовать Case.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years