Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
seidalisteam
16.05.2020 17:28 •
Информатика
Поскаль выручите 3. написать программу определения времени года по номеру месяца
Показать ответ
Ответ:
Erikalallala
05.10.2020 16:16
Программа на паскале:
var n:integer;
begin
write('n = ');
readln(n);
case n of
1,2,12: writeln('Зима');
3..5 : writeln('Вечна');
6..8 : writeln('Лето');
9..11 : writeln('Осень');
else writeln('Ошибка ввода');
end;
end.
Пример:
n = 2
Зима
0,0
(0 оценок)
Популярные вопросы: Информатика
bereza11
10.10.2020 23:17
Если векторное изображение распечатать, а потом отсканировать, то у нас получится векторное или растровое изображение и почему?...
даша2336
19.10.2021 03:47
Единственное что я могу делать на пк - ломать его с информатикой :)) 1. Які є налаштування появи об’єкта на слайді?А) по вказівці зі слайдом після слайду.Б) по бажанню...
kazbekkaharman
04.01.2022 07:47
скорость передачи данных через некоторое соединение равна 2048 000 бит/с Через данное соединение передают файл размером 1000 кбайт...
МОЗГ1987
20.09.2021 17:55
1. Как вы понимаете «тип данных»? 2. Какие типы данных вам известны? 3. Напишите код на языке Python (скрин отправить) Фраза: Моя любимая молодая столица Астана...
viktoiabekkknuv
12.02.2020 21:47
Є шість комп’ютерів об’єднаних в локальну мережу. Один із комп’ютерів – сервер БД. Побудуйте схему зв’язків між комп’ютерами при використанні файл-серверної технології...
красав4ик007
09.02.2021 13:15
Исследовательский проект по теме Свойства геометрических фигур Сделаю лучшим , только правильный ответ...
Исма124
15.06.2022 00:44
Определите значение переменной а после выполнения данного алгоритма: а := 3 b := 4 b := 72-а*b а := b/20*а В ответе укажите одно целое число — значение переменной...
Mastermastack
17.02.2020 20:52
с таблциой как можно быстрее...
Feraaa2108
22.04.2020 12:00
Как вы думаете, насколько важно классифицировать данные по типам в языке программирования?...
lenocekkotik856
14.09.2021 20:47
Импут процесі қандай қызмет атқарады...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var n:integer;
begin
write('n = ');
readln(n);
case n of
1,2,12: writeln('Зима');
3..5 : writeln('Вечна');
6..8 : writeln('Лето');
9..11 : writeln('Осень');
else writeln('Ошибка ввода');
end;
end.
Пример:
n = 2
Зима