Viết chương trình pascal để nhập vào năm sinh bất kỳ. In ra màn hình tuổi tương ứng. Giúp nhanh nha!
2 câu trả lời
program tuoi;
Var
nam:word;
Begin
write('Nhap nam sinh: '); readln(nam);
write('Tuoi la: ',2021-nam);
Readln;
End.
#HN
#Chuc_em_hoc_tot
uses crt;
var namsinh:longint;
begin
clrscr;
readln(namsinh);
writeln(2021 - namsinh);
readln;
end.