For i := 1 to T do

Begin

Write ( 'hay nhap gia tri so thuv',i,' la:');

Readln ( M[i] ) ;

End ;

Đoạn chương trình này làm gì

For i := 1 to T-1 do

For j := i+1 to T do

Begin

If M [ i]>M[ j] then

Begin

Tg:= M[ i];

M[ i]:= M[j];

M[j]:=Ig;

End;

Đoạn chương trình này làm gì

Viết chương trình nhập vào tối đa 250 số nguyên.ghi ra màn hình các số dương trong dãy đó

Vì sao nói cách mạng Tháng 10 nga làm thay đổi cục diện thế giới

Viết chương trình nhập vào tối đa 150 số nguyên . đếm xem trong dãy số trên có bao nhiêu số chẵn và chia hết cho 3 , ghi giá trị số đó ra màn hình mn giúp mk vs chiều nay mk nộp