Написать алгоритм нахождения числа дней в месяце, если даны: Номер месяца n - целое число а, равное 1 для високосного года и равное 0 в противном случае.
10-11 класс
|
НАЧАЛО
ВВЕДИТЕ N и A
ЕСЛИ n=1 ИЛИ n=3 ИЛИ n=5 ИЛИ n=7 ИЛИ n=8 ИЛИ n=10 ИЛИ n =12 ТО ВЫВЕСТИ '31'
ЕСЛИ n=4 ИЛИ n=6 ИЛИ n=9 ИЛИ n=11 ТО ВЫВЕСТИ '30'
ЕСЛИ n=2 И a=0 ТО ВЫВЕСТИ '28'
ИНАЧЕ ВЫВЕСТИ '29'
КОНЕЦ.
Другие вопросы из категории
встановлення міжабзацних і міжрядкових інтервалів
4. вирівнювання верхнього і нижньго краю текста
5. введення імені файла для зберігання
так, чтобы каждая из сторон одного прямоугольника былапараллельна или перпендикулярна каждой стороне второго прямоугольника.
Читайте также
31, мм - целое число из диапазона от 1 до 12, а гг - целое число из диапазона от 1 до 2020 (если какая-то часть формата нарушена, то данная подстрока в качестве даты не рассматривается.) Заменить каждую дату сообщения на дату следующего дня. Написать программу на Паскале. Сроооооооооооооочнооо. Пооожалуйста.....
1–12, введенное с клавиатуры (1 — январь, 2 — февраль и т. д.). Вывести название соответствующего времени года («зима», «весна», «лето», «осень»).
2, Напишите программу, реализующую следующие вычисления. Дана матрица размера M x N (числа вводятся с клавиатуры). Для каждого столбца матрицы найти произведение его элементов. Полученные значения вывести в текстовый файл.
3, Напишите программу с использованием функции CircleS(R) вещественного типа, находящей площадь круга радиуса R (R — вещественное). С помощью этой функции найти площади трех кругов с данными радиусами. Площадь круга радиуса R вычисляется по формуле S = πR2.
4, Напишите программу, реализующую следующие вычисления. Дано целое число N (1≤N≤26), введенное с клавиатуры. Вывести N первых прописных (то есть заглавных) букв латинского алфавита.
число и определить, какие цифры встречаются несколько раз (через repeat и until)///
ввести целое число и найти сумму его цифр (через while)
ввести целое число и определить , верно ли, что в его записи есть две одинаковые цифры(через while)
всё через паскаль абс
Если она представляет собой запись целого числа, то вывести 1, если
вещественного (с дробной частью) — вывести 2; если строку нельзя
преобразовать в число, то вывести 0. Считать, что дробная
часть вещественного числа отделяется от его целой части десятичной точкой «.».
Если введѐнное число не трѐхзначное, вывести сообщение об ошибке.(В ПАСКАЛЕ)