Câu 1: Viết một chương trình nhập hai số nguyên a và b và in ra màn hình trung bình cộng của chúng Câu 2: Viết chương trình nhập vào điểm bài kiểm tra của một bạn học sinh và đưa ra thông báo - Nếu điểm TBCM nhỏ hơn 5.0 thì in ra dòng chữ “Bạn cần cố gắng nhé!”; - Nếu điểm TBCM nhỏ hơn 6.5 và lớn hơn hoặc bằng 5.0 thì in ra dòng chữ “Bạn đạt điểm TB!”; - Nếu điểm TBCM nhỏ hơn 8.0 và lớn hơn hoặc bằng 6.5 thì in ra dòng chữ “Bạn đạt điểm Khá!”; - Nếu điểm TBCM lớn hơn 8.0 thì in ra dòng chữ “Hoan hô! Bạn đạt điểm Giỏi!”;

Câu 1: Viết một chương trình nhập hai số nguyên a và b và in ra màn hình trung bình cộng của chúng

Kietleotoptin :D

Program bai_lam;

uses crt;

var a,b,X:integer;

Begin;

Write('nhap gia tri cho a');readln(a);

Write('nhap gia tri cho b');readln(b);

X:=(a+b)/2

Write('trung binh cong cua a va b');readln(X);

Readln;

End.

Câu 2: Viết chương trình nhập vào điểm bài kiểm tra của một bạn học sinh và đưa ra thông báo - Nếu điểm TBCM nhỏ hơn 5.0 thì in ra dòng chữ “Bạn cần cố gắng nhé!”;

Kietleotoptin :D

Program bai_lam;

uses crt;

var a:integer;

Begin;

Write('nhap diem bai kiem tra cua ban');readln(a);

If a>5 then write('Ban can co gang nhe!')

Readln;

End.

Tương tự các ý còn lại