var t,v,a,dtb: real;
begin
writeln(' diem mon Toan la: ');
read(t);
writeln(' diem mon Van la: ');
read(v);
writeln(' diem mon Anh la: ');
read(a);
dtb = ( t + v + a)/3
if ( dtb >= 5 ) then
writeln(' duoc len lop');
else
writeln(' thi lai');
readln;
end.
Viết chương trình nhập điểm trung bình(dtb) từ bàn phím , nếu dtb > 8 thì xếp loại giỏi , ngược lại nếu 6.5 < dtb < 7.9 thì xếp loại khá , ngược lại nếu 5.0 < dtb < 6.4 thì xếp loại trung bình , ngược lại xếp loại yếu .In kết quả ra màn hình
Nếu điểm trung bình lớn hơn hoặc bằng 5 thì lên lớp ngược lại thì thi lại. Hãy chọn câu lệnh điều kiện đúng với mệnh đề trên.
A. if DTB >5 then writeln( ‘Len lop’) ;
B. if DTB < 5 then writeln( ‘ Thi lai’) ;
C. If DTB >=5 then writeln( ‘Len lop’) ; else then writeln( ‘ Thi lai’) ;
D. If DTB >=5 then writeln( ‘Len lop’) else then writeln( ‘ Thi lai’) ;
viết chương trình nhập điểm kiểm tra học kì I môn tin học cho n học sinh (với n và điểm được nhập từ bàn phím ) và in ra các kết quả sau: A: tổng điểm của lớp B:Điểm trung bình của lớp C:điểm cao nhất D:số học sinh đạt trung bình trở lên Lưu ý: Sử dụng biến đếm : For := to đó; Sử dụng biến mảng: var :array[..] of integer;
em hãy hoàn thành chương trình thông báo kết quả kì thi nghề phổ thông như sau: nhập vào họ tên thí sinh(ht), lớp (l), điểm thi lý thuyết (dlt), điểm thi thực hành (dth). sau đó tính điểm trung bình (dtb) của 2 phần thi đó: nếu dtb >=8 hoàn thành xuất sắc, dtb>=6.5 hoàn thành tốt, các trường hợp còn lại là hoàn thành. trong đó:+ điểm thực hành được làm tròn thành số nguyên dương +điểm trung bình bằng trung bình cộng của điểm lý thuyết và điểm thực hành + thông báo kết quả của thí sinh gồm: họ và tên, lớp, kết quả
Viết chương trình tính điểm TB các môn học (Văn, Toán, Ngoại ngữ) ? In ra điểm TB tính được, lấy 1 chữ số thập phân. Dựa vào điểm TB tính được, in ra kết quả xếp loại : “Xếp loại Giỏi” nếu điểm TB từ 8 trở lên; Xếp loại Khá” nếu điểm TB từ 6.5 trở lên và nhỏ hơn 8; “Xếp loại Trung Bình” từ 5 trở lên và nhỏ hơn 6.5; “Xếp loại Chưa Đạt” nếu điểm TB nhỏ hơn 5
Viết chương trình tính điểm TB các môn học (Văn, Toán, Ngoại ngữ) ? In ra điểm TB tính được, lấy 1 chữ số thập phân. Dựa vào điểm TB tính được, in ra kết quả xếp loại : “Xếp loại Giỏi” nếu điểm TB từ 8 trở lên; Xếp loại Khá” nếu điểm TB từ 6.5 trở lên và nhỏ hơn 8; “Xếp loại Trung Bình” từ 5 trở lên và nhỏ hơn 6.5; “Xếp loại Chưa Đạt” nếu điểm TB nhỏ hơn 5.
Cách viết thuật toán Tính tiền cho một của hàng như sau : nếu khách mua từ 300.000 đồng trở lên thì khuyến mãi 15 phần trăm , nếu khách mua từ 150.000 đồng trở lên thì khuyến mãi 10 phần trăm và ngược lại khuyến mãi 5 phần trăm
Viết chương trình thực hiện các yêu cầu sau :
a,Khai báo biến mảng DTB có số phần tử bằng sĩ số lớp em , các phần tử có kiểu dữ liệu số thực
b,Nhập dữ liệu cho mảng DTB từ bàn phím
c,Tính tổng giá trị các phần tử trong mảng
d,Thông báo kết quả ra màn hình
Giúp mình với , làm bằng pascal nhé!
Viết chương trình nhập từ bàn phím điểm môn tiếng Anh và môn Vật lý của n học sinh tính trung bình cộng môn tiếng Anh và môn lý của cả lớp