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
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 |
|
|
|
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!
Chương trình có những biến, hằng gì? Có mấy kiểu dữ liệu của biến được dùng trong chương trình? Câu lệnh writeln(thongbao, thanhtien:10:2) có ý nghĩa thế nào?
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.
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.
writeln(thongbao, thanhtien:10:2);
cho mình hỏi :10:2 trong câu lệnh trên có nghĩa là gì? (Pascal 8)
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
: Cho khai báo biến trong chương trình:
Var m, n: integer;
x , y : real; Lệnh nào gán sai?
A. m:= -4; B. x:= 6; C. n:= 3.5; D. y:= 10.5;
Hãy liệt kê các lỗi nếu có trong chương trình dưới đây và sửa lại cho đúng:
Var a, b := Integer;
Const c := 3;
Begin
a: = 200
b : = a / c ;
Write (b);
Readln;
End.
