var
n, t: Integer;
begin
Write ('Введите год рождения Насти: ');
Read (n);
Write ('Введите год рождения Тани: ');
Read (t);
if n = t then
WriteLn ('Родились в один год')
else
WriteLn ('Родились в разные годы');
end.
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
var
n, t: Integer;
begin
Write ('Введите год рождения Насти: ');
Read (n);
Write ('Введите год рождения Тани: ');
Read (t);
if n = t then
WriteLn ('Родились в один год')
else
WriteLn ('Родились в разные годы');
end.