• 20 баллов. Найдите пожалуйста ошибку, пишет всегда ошибка, не правильно введён номер месяца говорит а должно говорить от цифр 1-12 время года. Исправьте пожалуйста.

    question img

Ответы 2

  • Спасибо огромное
    • Автор:

      peaches
    • 5 лет назад
    • 0
  • var m:integer;

    begin

    readln(m);

    if (m=1) or (m=2) or (m=12) then writeln('z') else

    if (m=3) or (m=4) or (m=5) then writeln('v') else

    if (m=6) or (m=7) or (m=8) then writeln('l') else

    if (m=9) or (m=10)or (m=11) then writeln('o')

    else writeln('err');

    end.

    Или

    var m:integer;

    begin

    readln(m);

    if (m=1) or (m=2) or (m=12) then writeln('z');

    if (m=3) or (m=4) or (m=5) then writeln('v');

    if (m=6) or (m=7) or (m=8) then writeln('l');

    if (m=9) or (m=10)or (m=11) then writeln('o');

    if (m<1) or (m>12) then writeln('err');

    end.

    • Автор:

      maddy
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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