Составить прогрмму в паскале-кейс.
5-9 класс
|
которая по заданному году и номеру месяца m определяет оличество дней в этом месяце
var
n, y: integer;
begin
write('Введите месяц (1-12) и год (2001-2099): ');
readln(n, y);
case n of
1, 3, 5, 7, 8, 10, 12: writeln('31 день');
4, 6, 9, 11: writeln('30 дней');
2: if y mod 4 = 0 then write('29 дней') else write('28 дней')
end
end.
Тестовое решение:
Введите месяц (1-12) и год (2001-2099): 7 2014
31 день
Другие вопросы из категории
СЛОВА)ПОЛК
БАНТ(4 СЛОВА)КОСА
БЕГ(7 СЛОВ)ШАГ
МИГ(7 СЛОВ)ВЕК
2. Массив из 6 отрицательных и положительных целых чисел вводится в области описания констант. Найти сумму положительных элементов массива.
3. Массив из 5 целых чисел вводится с клавиатуры в строку. Найти сумму элементов массива, стоящих на чётных позициях. Вывести исходный массив и полученную сумму.
4. Массив из 40 целых чисел из промежутка [10,90] задается с помощью генератора случайных чисел. Найти сумму элементов массива, кратных n . Вывести исходный массив и полученную сумму.
Помогите кто в чем может.
пикселя? Каково максимально возможное число цветов в палитре, соответствующее такой глубине цвета?СРОЧНО)
Читайте также
пути:
направо,-"Коня потеряешь"
налево,-"голову сложишь"
вперёд,-"невесту найдёшь"
2.Составить прогрмму,которая определяет положительное число или отрицательное.
3.Дано целое число А.Если значение А>0,то необходимо его уыеличить на единицу.Если В<0,то уменьшить на единицу.
Зарание спасибо :)
программу на Паскале, в которой вычисляются четыре величины: средние температуры зимних месяцев, весенних месяцев, летних и осенних. 2)Вы посетили магазин и купили 10 видов товара. В таблицу T [1..10] записали количество купленного товара каждого вида. В таблицу C [1..10] записали цену единицы каждого вида товара соответственно. Составить программу на Паскале вычисления общей стоимости всех покупок.
купить на эти деньги?"
напишите пожалуйста как составить это в паскале) буду благодарна:)
и составляют b руб(в месяц).Рост цен ежемесячно увеличивает расходы на 3%,составьте программу расчета необходимой суммы денег,которую нужно единовременно попросить у родителей,чтобы можно было прожить 10 месяцев,используя эти деньги.
Агент 007 узнал, что в секретном сейфе трёхзначный код, в котором все три цифры разные.При этом средняя цифра равна разности крайних цифр. Составить программу, которая напечатает для него все такие числа.