viết chương trình nhập vào 2 số nguyên n,m, in ra màn hình các số từ lớn đến bé biết n < m . mik đang gấp nhờ mọi ng giúp mik vs ạ

2 câu trả lời

Program BTT;
Uses crt;
Var m,n,i: longint;
Begin
        Clrscr;
        Write('Nhap m: '); Readln(m);
        Write('Nhap n: '); Readln(n);
        For i:=m downto n do
                Write(i,' ');
        Readln
End.

var n,m,i:longint;

begin

write('Nhap n: '); readln(n);

write('Nhap m: '); readln(m);

for i:=m down to n do

write(i,' ');

readln;

end.