Question

с клавиатуры вводятся две даты. выдать сообщения "правильно",если первая введённая дата предшествует второй, и "неправильно", если наоборот.

Answer 1

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
правильно

Answer 2

Для выполнения такой задачи можно использовать следующий код на языке Python:

pythonCopy code
def compare_dates(date1, date2):
    day1, month1, year1 = map(int, date1.split('.'))
    day2, month2, year2 = map(int, date2.split('.'))
    
    if year1 < year2 or (year1 == year2 and month1 < month2) or (year1 == year2 and month1 == month2 and day1 < day2):
        return "правильно"
    else:
        return "неправильно"

date1 = input("Введите первую дату в формате ДД.ММ.ГГГГ: ")
date2 = input("Введите вторую дату в формате ДД.ММ.ГГГГ: ")

result = compare_dates(date1, date2)
print("Результат сравнения дат:", result)

Скопируйте этот код в среду разработки на Python и выполните его. Он попросит вас ввести две даты в формате ДД.ММ.ГГГГ и затем выдаст сообщение "правильно", если первая дата предшествует второй, и "неправильно", если наоборот.