Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
mr20171
18.02.2022 23:18 •
Информатика
Реализуйте решение , программируя на паскале. по номеру месяца вывести на печать количество дней в нем . ( январь - 1 месяц, декабрь-12 месяц .)
Ответ:
Veronika234629
02.07.2020 23:52
Const a:array[1..12] of integer=(31,28,31,30,31,30,31,31,30,31,30,31);
var b:integer;
begin
readln(b);
writeln(a[b]);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Nezik
03.05.2020 12:53
Напишите алфавит восьмеричной системы счисления...
dfytr88
12.06.2022 16:13
Какие инструменты 3D-редактора относятся к группе инструментов модификации?...
Maks23241
08.01.2020 15:43
Увити было 7 рублей он решил купить карандаш за х рублей сколько денег у него станется или сколько не хватит если х=5 и х=10...
marmishenka
22.02.2020 01:49
В программе «:=» обозначает оператор присваивания, знаки «+», «–», «*» и «/» – соответственно операции сложения, вычитания, умножения и деления. Правила выполнения операций и порядок...
FTA72артем
17.07.2021 13:46
Напишите программу вычисления суммы первых членов геометрической прогрессии...
arina68668
09.07.2020 18:01
Будь ласка, терміново напишіть навчальний твір на тему пісня є людину впродовж усього життя - від колиски до могили....
ksyusham041
09.07.2020 18:01
Определить знаменатель и сумму членов прогрессии , в которой b1=-20 1/4, n=5,bn=-1/4...
Tatyna83
09.07.2020 18:01
Как можно использовать данные природные условия для получения повышения в узбекистане?...
marinovamari1
09.07.2020 18:01
Язык 4 класс 117. прочитай.отгадай загадку есть глаз - не видят, есть уши - не слышат, есть рот - не говорит, есть нос - нюхает. • подчеркните глагол с ударные окончанием. • выделите...
geroi29
25.03.2020 14:24
Cos(a+в)+sina×sinв/ сos(a-в)-sina×sinв а - альфа в-бэта...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var b:integer;
begin
readln(b);
writeln(a[b]);
end.