Помогите плиз сежу на уроке

Помогите плиз сежу на уроке

Задать свой вопрос
Дзядевич Эльвира
сежи далее
1 ответ
Var A:integer;
Begin
Read(A);
A:= A mod 12;
if (Agt;=0)and(Alt;3) then Write(Зима);
if (Agt;2)and(Alt;6) then Write(Весна);
if (Agt;5)and(Alt;9) then Write(Лето);
if (Agt;8)and(Alt;=11) then Write(Осень);
End.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт