câu a) Input: Số N
Output: Các số từ 1 đến N giảm dần
câu b) var N,i: integer;
câu b) Chương trình:
uses crt;
var N,i: integer;
Begin
clrscr;
write('Nhap so N: '); readln(N);
writeln('Cac so tu 1 den ',N,' theo thu tu giam dan: ');
for i:=N downto 1 do write(i,' ');
readln
End.
