+thứ nhất, chỗ S:=a*b bạn thiếu ";"
+thứ hai, chỗ readln trước "end." thì ko đc thêm ";" vào sau "readln"
+thứ nhất, chỗ S:=a*b bạn thiếu ";"
+thứ hai, chỗ readln trước "end." thì ko đc thêm ";" vào sau "readln"
Cho chương trình sau :
( Tính chu vi và diện tích tam giác biết 3 cạnh a,b,c với chiều cao h ứng với cạnh a nhập từ bàn phím )
Uses crt;
Var a,b,c,h,chuvi,dientich : integer;
Begin
clrscr;
Writeln('Nhap canh a= '); Readln(a);
Writeln('Nhap canh b= '); Readln(b);
Writeln('Nhap canh c= '); Readln(c);
chuvi := a+b+c;
dientich := a*h/2
Writeln('Chu vi hinh tam giac la = ', chuvi);
Write('Dien tich hinh tam giac la = ', dientich);
Readln;
End.
Giải thích lý do vì sao chương trình không chạy được.
cho chương trình sau hãy sắp xếp lại cho đúng
var a,b,c:integer;
c:=a+b;
begin
write('nhap gia tri a);
readln(b);
program tong hai so;
end.
write('nhap so b')
readln(a);
clrscr;
readln;
uses crt;
writeln(tong cua hai so vua nhap la:',c)
bạn nào biết thì giúp mình với mai mình kt rồi
Nêu ý nghĩa của các từ khóa,câu lệnh trong Pascal: program,begin,end,uses,var,const,clrscr,delay(x),write ( ),readln,readln (x)
Bạn Tuấn viết chương trình như sau:
program Tinh toan
uses crt;
var
x, y : integer;
tb = real;
thongbao : integer;
const a := 2;
begin
clrscr;
thongbao := ‘Trung binh cong cua hai so x va y la: ‘;
write(‘Nhap gai tri cho x = ‘); readln(x);
write(‘Nhap gia tri cho y = ‘); readln(y);
tb = (x+y)/a;
writeln(thongbao, tb:2:1);
readln;
end.
a. Có một vài câu lệnh bạn Tuấn viết sai, em hãy viết lại cho đúng.
b. Hãy phân biệt tên biến, tên hằng trong chương trình trên.
Chỉ ra các lỗi trong chương trình sau gạch chân và chỗ sai giải thích const pi=3.1416; clrscr; begin a:=500 b:=a*a*pi; c=a+b write(c) readln end
Hãy liệt kê các lỗi, điền từ khuyết, sắp xếp lại các câu lệnh trong chương trình sau:
1. Program Tinh tien;
2. Uses crt
3. ....... soluong,dongia,Tienthanhtoan:=integer;
4. ....... Phi=1000;
5. ..........
6. Clrscr;
7. write('nhap so luong:');readln(soluong);
8. write('nhap don gia:');readln(dongia);
9. writeln('So tien quy khach phai thanh toan la:',Tienthanhtoan);
10. Tienthanhtoan = soluong*dongia+phi;
11. ............
12. End.
giúp mik vs các bạn!
Hãy liệt kê các lỗi, điền từ khuyết, sắp xếp lại các câu lệnh trong chương trình sau:
1. Program Bai11;
2. ........ crt;
3. ........ a,b,H:integer;
4. ........ c=12;
5.Begin
6. Clrscr;
7. write('nhap a='); Readln(a);
8. write('nhap b='); ...........(b)
9. H:=a*a+b*b+c;
10. Readln;
11. Writeln('H=',H);
12. .......
Cho chương trình viết trong Pascal:
Program Tinh_tien;
Var soluong: integer;
Dongia, thanhtien: real;
Const phi = 10000;
Begin
Writeln (‘Don gia: ’);
readln (Dongia);
Writeln (‘So luong : ’);
readln (soluong);
thanhtien:= soluong*Dongia + phi;
Writeln (‘So tien khach hang phai tra la: ’, thanhtien);
End.
Hãy phân biệt hằng, biến trong chương trình trên và đánh dấu X vào bảng sau:
Hằng Biến Không phải hằng hoặc biến
soluong
Dongia
thanhtien
phi
10000
Tinh_tien