Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
DaryaMoh
10.11.2022 08:15 •
Информатика
Склавиатуры вводятся две даты. выдать сообщения "правильно",если первая введённая дата предшествует второй, и "неправильно", если наоборот.
Показать ответ
Ответ:
QWERTY12345P
05.10.2020 17:27
Var d1,m1,y1,d2,m2,y2:integer;
begin
write('1-я дата: ');
readln(d1,m1,y1);
write('2-я дата: ');
readln(d2,m2,y2);
if (y1<y2)or(y1=y2)and(m1<m2)or(y1=y2)and(m1=m2)and(d1<d2)
then writeln('правильно')
else writeln('неправильно');
end.
Пример:
1-я дата: 12 2 2017
2-я дата: 4 3 2017
правильно
0,0
(0 оценок)
Популярные вопросы: Информатика
lovevika3
03.01.2023 02:40
Определите информационный объем текста ‹синхрофазотрон !перекаты!»...
113020021
26.08.2022 11:29
1 Задание С++ Ввести с клавиатуры длину ребра куба. Найти объем куба и площадь его боковой поверхности. 2 Задание С++ Организовать ввод с клавиатуры двух действительных...
лев234325
24.05.2021 23:28
НАДО. Система команд исполнителя Вычислительсостоит из двух команд, которым присвоеныномера:1 — вычти 22 — умножь на 3Первая из них уменьшает число на 2, втораяувеличивает...
Nobd
24.05.2021 23:28
Какая вкладка меню дает возможность настроить эффектную появление и перемещение объектов на слайде? Показ слайдовУстановкаКонструкторАнимация...
ArturSSexe
23.09.2021 00:23
Напишите программу, которая получает с клавиатуры номер месяца и выводит название соответствующего ему время года или сообщение об ошибке. пример: введите номер...
Руслан5551111
16.09.2020 15:38
Склавиатуры введена строка, состоящая из трёх 2-х значных чисел, разделенных пробелами. найти произведение этих чисел и вывести его на экран....
akimfugenko
09.07.2022 10:47
Сформулируйте массив а из 20 элементов с рандом и выведите его на экран...
sveta454
30.01.2022 11:06
Дана последовательность чисел количество которых задает пользователь программы. найти и вывести минимальный элемен последовательности кратный 5...
dranithkindana
12.10.2022 08:34
Напишите программу определяющую является ли заданное целое положительное число простым паскаль 7 класс...
j5022778
31.10.2021 07:56
Складіть невеличка розповідь про Наталочка із Таємниця Козацької шаблі...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('1-я дата: ');
readln(d1,m1,y1);
write('2-я дата: ');
readln(d2,m2,y2);
if (y1<y2)or(y1=y2)and(m1<m2)or(y1=y2)and(m1=m2)and(d1<d2)
then writeln('правильно')
else writeln('неправильно');
end.
Пример:
1-я дата: 12 2 2017
2-я дата: 4 3 2017
правильно