Program voz; uses crt; var a,b,c,d,e,f : integer; begin Write('Какая сейчас дата?(д м г)'); Read(a,b,c); write('Введите дату вашего рождения (д м г)'); read(d,e,f); if (b>=e) and (a>=d) then Writeln('Вам ',c-f,' лет') else writeln('Вам ',c-f-1,' лет'); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
