Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
![](https://rs.olm.vn/images/avt/0.png?1311)
var a:real;
begin
write('nhap diem kiem tra: '); readln(a);
if a<5 then writeln('Ban can co gang hon!');
if (a>=5) and (a<6.5) then writeln('Ban dat diem trung binh!');
if (a>=6.5) and (a<8) then writeln('Ban dat diem kha!');
if a>8 then write('Chuc mung,ban dat diem gioi!');
readln
end.
![](https://rs.olm.vn/images/avt/0.png?1311)
uses crt;
var diem:real;
begin
clrscr;
write('nhap diem:'); readln(diem);
if diem<5 then writeln('diem yeu ban can co gang hon')
else if (diem>=5) and (diem<6,5) then writeln('ban dat diem trung binh')
else if (diem>=6,5) and (diem<8) then writeln('ban dat diem kha')
else writeln('ban dat diem gioi');
readln;
end.
![](https://rs.olm.vn/images/avt/0.png?1311)
program DiemTB;
var
diemToan, diemVan, diemTB: real;
begin
write('Nhap diem mon Toan: ');
readln(diemToan);
write('Nhap diem mon Van: ');
readln(diemVan);
diemTB := (diemToan + diemVan) / 2;
writeln('Diem trung binh: ', diemTB:0:2);
if diemTB >= 5 then
writeln('Chuc mung! Ban da dau ky thi.')
else
writeln('Rat tiec! Ban da truot ky thi.');
readln;
end.
![](https://rs.olm.vn/images/avt/0.png?1311)
program SoSanhDiem;
var
DiemManh, DiemThanh: real;
begin
write('Nhap diem cua ban Manh: ');
readln(DiemManh);
write('Nhap diem cua ban Thanh: ');
readln(DiemThanh);
if DiemManh > DiemThanh then
writeln('Ban Manh dat diem cao hon ban Thanh.')
else if DiemManh < DiemThanh then
writeln('Ban Thanh dat diem cao hon ban Manh.')
else
writeln('Hai ban dat diem bang nhau.');
readln;
end.
![](https://rs.olm.vn/images/avt/0.png?1311)
#include <bits/stdc++.h>
using namespace std;
int a;
int main()
{
cin>>a;
if (a>10) cout<<"ban nhap so lon hon 10";
else cout<<"ban nhap so nho hon 10";
return 0;
}
![](https://rs.olm.vn/images/avt/0.png?1311)
1)
var a,b : integer;
begin
writeln('nhap a va b =');
readln(a,b);
if a>b then writeln('So lon hon la a') else writeln('so lon hon la b');
if a=b then writeln('a va b bang nhau');
readln
end.
![](https://rs.olm.vn/images/avt/0.png?1311)
Program HOC24;
var a,b: real;
begin
write('Nhap diem cua Manh: '); readln(a);
write('Nhap diem cua Thanh: '); readln(b);
if a>b then write('Diem cua ban Manh cao hon ban Thanh');
if a<b then write('Diem cua ban Thanh cao hon ban Manh');
if a=b then write('Diem cua ban Manh bang ban Thanh');
readln
end.