Hãy cho biết kiểu dữ liệu của các biến cần khai báo dùng để viết chương trình giải bài toán sau
a) Tính điểm trung bình (DTB)học lực của học sinh với 3 điểm với 3 điểm là điểm kiểm tra thường xuyên (KTTX), điểm kiểm tra giữa kì(KTGK) và điểm kiểm tra cuối kì (KTCK).Sau đó xếp hạng học lực (Xep hang HL) dựa vào nguyên tắc :
Điểm trung bình >=9,0 là Hạng A
Điểm trung bình >=7,0 và <9,0 là Hạng B
Điểm trung bình >=5,0 và <7,0 là Hạng C
Điểm trung bình <5,0 là hạng F
b) Tính số tiền khách hàng mua Sản phẩm(SP) tại cửa hàng với Số tiền(ST) thanh toán bằng Số lượng(SL) nhân với Đơn giá(ĐG)
a) Các kiểu dữ liệu của biến:
var DTB, KTTX, KTGK, KTCK: real;
Xep hang HL: string;
b) Các kiểu dữ liệu của biến:
var SP:string;
ST, SL, DG: real;
a)uses crt;
var TBC,t,l,h:real;
begin
clrscr;
write(‘nhap diem toan=’);readln(t);
write(‘nhap diem ly=’);readln(l);
write(‘nhap diem hoa=’);readln(h);
t:=t*2;
TBC:=(t+l+h)/4;
if (TBC>=8) then writeln(‘chuc mung ban da duoc loai gioi ‘)
else
if (6.5<=TBC) then writeln(‘chuc mung ban da duoc loai kha ‘)
else
if (5<=TBC) then writeln(‘chuc mung ban da duoc loai trung binh ‘)
else writeln(‘chuc mung ban da duoc loai yeu ‘);
readln;
end.
b)uses crt;
var sl,dg:longint;
begin
clrscr;
write(‘nhap so luong’);readln(sl);
write(‘nhap don gia’);readln(dg);
writeln(‘so tien can tra la ‘,sl*dg);
readln;
end.