Pro nào giúp em bài tập pascal này với :((

[duyljch]

Tình hình là cai khoản pascal này em chỉ đến lớp và ngủ nên giờ chẳng biết gì cả, pro nào biết giúp em , em cám ơn nhiều lắm ngày mai em phải nộp bài rồi . Hiz Hiz

Bài 1
Viết phương trình tìm ước chung lớn nhất sử dụng vòng lặp và phép chia có dư
Bài 2
Cho 1 mảng A nhập vào từ bàn phím , sắp xếp mảng theo chiều tăng dần rồi tính tổng của mảng đó

Bài 3
Nhập 1 danh sách sinh viên gồm họ tên, tuổi, điểm của 3 môn toán, lý, hóa. Hãy viết chương trình và cho biết điểm TB bằng điểm toán tính hệ số 3, điểm lý tính hệ số 2, điểm hóa tính hệ số 1 . In ra màn hình Họ tên, phân loại và điểm TB

[1hakunamatata]

bai` 2:
mình chỉ ghi thuật toán thui nha.

for j:=n downto 2 do
for i:=1 to j-1 do
if a[i]>a[i+1] then
begin
t:=a[i];
a[i]:=a[i+1];
a[i+1]:=t;
end;
for i:=1 to n do
write(a[i]:4);
s:=0;
for i:=1 to n do
s:=s+a[i];
writeln('tong day so la',s:3);

[duyljch]

Bác ơi, thật sự là em không biết j` cả. Bác cứ viết hết ra cho em được không . Em thnk nhiều

[bvnguyen]

Bác ơi, thật sự là em không biết j` cả. Bác cứ viết hết ra cho em được không . Em thnk nhiều

để bác copy đem nộp thầy ah :)

[duyljch]

uhm. thì làm nộp cho thầy mà bác có giúp được không