Написать программу, которая будет определять возраст .
Написать программу, которая будет определять возраст .
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы