Var A:integer; Begin Read(A); A:= A mod 12; if (Aamp;gt;=0)and(Aamp;lt;3) then
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. Для чего нужно "A:= A mod 12" ??? Безотлагательно
Задать свой вопрос
Коля Умаханов
Напишите программку, которая вводит номер месяца и выводит заглавие времени года.Оператор выбора использовать не разрешается. При вводе неправильного номера месяца должно быть выведено извещение об ошибке.
Вовка Нагашян
Если А=11 то будет А:=11 mod 12=0.9 и что мне это дает?
1 ответ
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Игорь 14 лет назад был на 8 лет моложе, чем его
Математика.
Два тела массами m1 и m2 находящие на расстоянии R друг
Физика.
В сосуде 4целых одна пятая литр воды что бы заполнить сосуд
Математика.
Двум малярам Диме И Олегу поручили выкрасить фасад дома они разделили
Разные вопросы.
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
Облако тегов