Các cao nhân giúp e vs! Hãy viết các câu lệnh tương ứng thực hiện các yêu cầu sau: a) Khai báo hằng NS (năm sinh) có giá trị là năm sinh của học sinh. b) Khai báo biến T (tuổi) có kiểu số nguyên. c) Lập biểu thức tính tuổi bằng cách lấy năm hiện hành trừ năm sinh. d) Đưa ra màn hình số tuổi tính được của người đó
2 câu trả lời
Câu a: Năm sinh là giá trị số nguyên dương
Var NS: integer;
Câu b: Tuổi là giá trị số nguyên dương và bé hơn 255
Var T: byte;
Câu c:
Tuoi := 2021 - NS;
Câu d:
Write('Tuoi cua nguoi do: ', Tuoi);
a) var NS : integer;
b) var T : byte;
c) T := 2021 - NS;
d)
program tinh_tuoi;
uses crt;
var T : byte;
NS : integer;
begin
clrscr;
T := 2021 - NS;
writeln('so tuoi hien tai cua ban la : ', T);
readln
end.
