C9:(Mk đoán mò câu hỏi nhé: câu nào sau đây sai)     B.Hằng có thể thay đổi trong qt thực hiện chg trình

C10:A đúng vì 5^2=25 mà 3^2+4^2 =25

B.Tự luận

C1:

a,(15-4+3)/(2+3)-(2+5)/x+y

b,((10+x)*(10+x))/(3+y)-(18+5)/(y*y*y)

C3:nhìn ảnh (Có 6 lỗi sai)

Sửa:

1,program tinh_tong;

2,var r,chuvi,dientich:real;

3,const pi=3.14;

4,chuvi:=2*pi*r; dientich:=pi*r*r;

5, writeln('chu vi duong tron =',chuvi:8:3);

6,readln;

C4:

uses crt;

var m,n,a,S,R,P:integer;

const vo=5000;

but=3500;

begin

write('nhap so vo da mua: ');readln(m);

write('nhap so but da mua: ');readln(n);

S:=m*vo;

R:=n*but;

P:=S+P;

writeln('So tien phai tra ban dau la: ,P);

a:=P div 10;

P:=P-a:

writeln('Sau khi khuyen mai phai tra so tien la: ',P);

readln;

end.

Đây là câu tl của mk nếu có j sai mong bn bỏ qua nhé!

Câu 10 : 25 = 25 => Đúng
Câu 1:
a) (15 - 4 + 3)/(2 + 3) - (2 + 5)/x + y
b) sqr(10 + x)/(3 + y) - (18 + 5)/sqr(y)
Câu 3 :
1)     Program tinhtong;
2)     Var r, chivi, dientich : real;
3)     Const pi = 3.14;
4)     Begin
5)     Write('Nhap so ban kinh r =');Readln(r);
6)     Chuvi := 2*pi*r; dientich := pi*r*r;
7)     Writeln('chu vi duong tron =', chuvi:8:3);
8)     Writeln('dien tich hinh tron =', dientich:8:3);
9)     Readln
10)   End.
Dòng 1 sau tinhtong thiếu dấu chấm phẩy;
Dòng 2 sau dientich là dấu hai chấm
Dòng 3 sau pi dư dấu hai chấm
Dòng 6 sau chuvi thiếu dấu hai chấm
Dòng 7 có thể ghi là writeln 
Dòng 8 dientich:8:3 được đặt trong dấu ngoặc đơn là không đúng
Câu 4:
program khuyen_mai;
uses crt;
var m, n :integer;
begin
clrscr;
write('nhap so quyen vo can mua :');readln(m);
write('nhap so cay bu bi can mua :');readln(n);
writeln('so tien can phai tra luc ban dau la :', m*5000 + n*3500);
writeln('so tien can phai tra luc sau la :', (( m*5000 + n*3500 )*90/100):8:);
readln
end.