Viết chương trình nhập vào từ bàn phím họ tên lớp điểm toán văn anh hiển thị HVT lớp tổng điểm và trung bình của học sinh đó. TRONG PASCAL
2 câu trả lời
program sksk;
uses crt;
var a, b, c : real;
e, f : string;
begin
clrscr;
write('nhap ho va ten :');readln(e);
write('nhap lop cua ban :');readln(f);
write('nhap diem toan :');readln(a);
write('nhap diem anh van :');readln(b);
write('nhap diem van :');readln(c);
writeln('Ho Va Ten : ', e);
writeln('Hoc Sinh Lop :', f);
writeln('Tong diem ba mon hoc :', a+b+c);
writeln('Diem trung binh ba mon la :', (a+b+c)/3);
readln
end.
program diem_tb;
uses crt;
var a, b, c, tb: real;
begin
clrscr;
writeln ('Ho va ten hoc sinh:');
write ('Diem Toan = '); readln (a);
write ('Diem Van = '); readln (b);
write ('Diem Anh = '); readln (c);
tb := (a + b + c) / 3;
write ('Diem trung binh cua hoc sinh nay la:', tb:2:2);
readln;
end.