Bài Tập Mảng 1 Chiều Trong Pascal - Cần Gấp trước 9h30' tối nay ^^!

[darkhacker_q91]

Đề : Viết chương trình nhập họ tên, điểm và điểm trung bình của 55 học sinh lớp A (dùng kiểu mảng 1 chiều >''<), giúp mình với, cần gấp lắm !
cám ơn nhiều

[Tri Duc]

điểm TB của bao nhiu môn vậy ta trả lời tui ngồi làm giúp cho!!!! mà nói rõ đề bài hơn đi ông

[darkhacker_q91]

Điểm trung bình 1 môn tin gồm có : 1 cột miệng, 2 cột 15', 1 cột 45', 1 bài thi , nhân hệ số bình thường, chia ra trung bình bạn. Nếu chưa hiểu đề nữa thì cho nick ym cái

[darkhacker_q91]

hic, mới đó mà đi đâu rồi ko thấy vậy ? Có ai giúp với ko ? Sắp 9h30 rồi >''<

[mr_invincible]

Cần nhanh như vậy thì gấp quá. Hướng dẫn: tạo kiểu record lưu các dữ liệu về học sinh:
type
rec=record
ten:string[20];
d1,d2,d3,d4,d5,tb:real;
end;
var hs:array[1..100] of rec;
{Chương trình chính}
BEGIN
Write('So hoc sinh = '); Readln(s);
{Nhập dữ liệu của các học sinh}
For i:=1 to s do
with hs[i] do
begin
Write('Nhap ten: '); Readln(ten);
{Nhập điểm}
end;
For i:=1 to s do
with hs[i] do
begin
tb:=(d1+d2+d3+d4*2+d5*3)/8;
end;
{Viết kết quả ra}
END.
Chú ý: các biến nào tôi chưa khai báo thì bạn nhớ thêm vào nhé.

[darkhacker_q91]

hic, hic , kiểu record em làm được rồi, chẳng hiểu sao ông thầy lại ra cái đề quái ác là phải dùng kiểu mảng, chưa học tới phần record

[mr_invincible]

Nếu thế thì khai báo nhiều mảng, 1 mảng tên, 5 mảng điểm, 1 mảng trung bình

[darkhacker_q91]

anh có thể viết giúp được ko ? Full chương trình đi, em có thể chờ

[mr_invincible]

Sau đây tôi làm chẳng cần mảng hay gì cả, chỉ nhập vào rồi tính luôn, nếu muốn lưu lại thì bạn chỉnh sửa thêm chút ít nhé
Các biến nào thiếu bạn tự thêm vào nhé
BEGIN
Write('Nhap so hoc sinh'); Readln(s);
For i:=1 to s do
begin
Write('Ten: '); Readln(ten);
Write('Nhap cac diem: '); readln(d1,d2,d3,d4,d5);
Tb:=(d1+d2+d3+d4*2+d5*3)/8;
Writeln('Trung binh = ',tb);
end;
Readln;
END.

[darkhacker_q91]

đề lại bắt buộc dùng mảng 1 chiều. hic, dù sao cũng cám ơn rất nhiều

[mr_invincible]

Dùng mảng 1 chiều thì bạn sửa lại ở trên chút thôi. Thay vì đọc vào riêng từng biến d1,... thì bạn đọc vào phần tử thứ i của mảng d1,... (d1[i]). Sau đó duyệt thêm một lần các mảng để in kết quả ra)

[darkhacker_q91]

ok, cám ơn nhiều lắm

[Thanhdong79]

ĐỀ:
Cho 2 dãy số a1->an và b1->bn
Câu hỏi:
In ra các số trong ai tương ứng với bi nằm trong khoảng 20 --->30
In ra 5 giá trị trong ai tương ứng với bi đạt giá trị mã

Các Anh làm hộ em với

[bld]

'ai','bi', là jì vậy you?

[Thanhdong79]

Bạn ơi dãy a1..ai..an
b1...bi..bn
In ra những phần tử thứ a[i](i chạy từ 1 tới n) tương ứng với 20<b[i]<30

[nguyenductoandhv]

Không hiểu đề lắm! ai và bi có mối quan hệ gì vậy? Nói rõ hơn đi

[thuonghcm]

ĐỀ:
Cho 2 dãy số a1->an và b1->bn
Câu hỏi:
In ra các số trong ai tương ứng với bi nằm trong khoảng 20 --->30
In ra 5 giá trị trong ai tương ứng với bi đạt giá trị mã

Các Anh làm hộ em với

quá dễ thôi có gì đâu?
for i:=1 to n do
if b[i] in [20..30] then writeln(a[i]);
'----------------------------------------------
câu b thi đề phải rb lại, VD max của b[i] nếu 0 đủ 5 thì sao?
vd b[i] là: 1 1 1 1
ntn?

[timberlake]

đề lại bắt buộc dùng mảng 1 chiều. hic, dù sao cũng cám ơn rất nhiều

Đề bắt buột dùng mảng 1 chiều Nhung nó có giới hạn số lượng mảng 0?
if 0 thì làm như mr_invincible

[phebeo1080]

các bạn nói rỏ ra hơn 1 chút đi

[somus]

mình cũng có bài tập muốn hỏi các bạn:Nhập vào 1 mãng n phần tử và kiểm tra xem phần tử bạn nhập vào có thuộc mãng đó không,giúp mình với

[lanphuong110408]

Xin chao dien dan. Minh la lan phuong, vua moi dang nhap vao dien dan. Minh rat thich hoc lap trinh passcal nhung moi bat dau tiep can nen hoi bo ngo. co le minh se bat dau tu viec hoc hoi kinh nghiem tu cac thanh vien trong dien dan, sau do minh xin chia se voi dien dan sau. xin cam on

[phamnga309]

mọi người giúp mình code cho bài này với:viết chương trình bằng ngôn ngữ lập trình pascal cho máy tính làm những việc sau:
1. nhận vào mảng A,B mỗi mảng có n phần tử là những xâu chỉ gồm các chứ số khác ' 0 ' có độ dài không nhỏ hơn 6(n>9).
chú ý :mảng bắt đầu từ 1 và kiểm tra từng phần tử khi nhập vào từ bàn phím.
2. gọi p(x) là hàm trên xâu X được xác định như sau:
s1 là tổng của 4 chữ số mà mỗi chứ số được tạo thành từ kí tự tương ứng của 4 kí tự sau cùng của X
s2 là tổng các ước lớn hơn 2 của s1.
p(x) là xâu được đổi từ số s2 sang xâu.
minh đang cần gấp. thanks các bạn nhiều