K
Khách

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.

3 tháng 12 2017

Program bai4;

Const pi:= 3.1416;

Var cv,dt,r:real;

Begin

R:=5.5;

cv:=2*Pi*r;

dt:=pi*r*r;

Writeln('chu vi hinh tron la:',cv);

Writeln('Dien tich hinh tron la:',dt);

readln

End.

4 tháng 12 2017

Hàm const làm gì có : bạn.

Đáng nhẽ R thành r chứ.

Sai kiến thức là bay đầu đó bạn." Bút xa gà chết" đấy.

17 tháng 12 2019

Dòng 1 tên chương trình khai báo sai

sửa lại program hinh_tron;

Dòng 2 phần kahi báo k có dấu "=" trước integer

sửa lại vả cr,dt,t: integer;

Dòng 6 thiếu dấu"=" sau dấu ":"

sửa lại dt:=pi*r*r;

Dòng 7 lệnh in kq sai

sửa lại writeln(' chu vi la:',cv);

Dòng 8 lênh in kq sai

sửa lại writeln(' dien tich la:',dt);

Dòng 1,2,4,5,6,7,8,9 thiếu ;

và dòng 10 thiếu "."

5 tháng 12 2021

Var cv, dt : integer
r : real;
Const pi = 3.14;
Begin
r = 5.5;
dt := pi*r*r;
writeln(‘Dien tich hinh tron la:,dt:8:2’);
readln
End.

16 tháng 12 2022

Tìm và sửa lại lỗi nha mn

17 tháng 12 2022

Const pi:= 3.14; 

 Var cv:integer -> Thiếu dấu ; khi kết thúc 1 câu lệnh nào đó. (Var cv:integer; )

 R:real; 

Begin

 R:=5.5; 

Cv=2*pi*r;

 Writeln('chu vi la:=cv');  -> Câu lệnh không lỗi nhưng để in ra kết quả thì biến cv cần nằm ở ngoài dấu nháy. ( Writeln('chu vi la= ',cv); )

 Readln 

End.

28 tháng 9 2020

Bạn làm thiếu begin và end nhé. Vì ở dòng 12 bạn dùng else nhưng trước nó không có câu lệnh điều kiện.

program CTT5;
uses crt;
var a,b : integer;
begin
writeln('Nhap so hang dau tien : ');readln(a);
writeln('Nhap so hang thu hai : ');readln(b);
if b=0 then

Begin

writeln('Ket qua phep cong la : ',a+b);
writeln('Ket qua phap tru la : ',a-b);
writeln('Ket qua phep nhan la : ',a*b);
writeln('Khong the chia cho 0');

end
else

begin
writeln('Ket qua phep cong la : ',a+b);
writeln('Ket qua phap tru la : ',a-b);
writeln('Ket qua phep nhan la : ',a*b);
writeln('Ket qua phep chia la : ',a div b);

end;
readln;
end.

10 tháng 11 2021

Cho em hỏi writeln('ket qua phep cong la: ',a+b); có ý nghĩa gì vậy ạ 

18 tháng 3 2018

a. Chương trình 1 là chương trình Pascal đầy đủ và hoàn toàn hợp lệ, mặc dù chương trình này chẳng thực hiện điều gì cả. Phần nhất thiết phải có trong chương trình là phần thân chương trình được đảm bảo bằng hai từ begin và end. (có dấu chấm).

b. Chương trình 2 là chương trình Pascal không hợp lệ vì câu lệnh khai báo tên chương trình program CT_thu; phần khai báo tên trương trình không được nằm ở phần thân chương trình mà phải nằm ở đầu chương trình.

Câu 1: Trong các tên dưới đây, tên nào là không hợp lệ trong Pascal? A. Bai tap. B. Lop8A; C. Hinh_binh_hanh; D. Chuong_tình; Câu 2: Để chạy chương trình Pascal ta sử dụng tổ hợp phím nào? A. Alt+F4 B. Ctrl+F9 C. Ctrl+shift+F9 D. Shift+F3 Câu 3: Trong Pascal, ở các câu lệnh sau thì câu lệnh khai báo nào đúng? A. var 3A: integer; B. const Pi:=3.14; C. var a,b: integer; D. var CV= real; Câu 4: Trong các câu sau, câu...
Đọc tiếp

Câu 1: Trong các tên dưới đây, tên nào là không hợp lệ trong Pascal?
A. Bai tap. B. Lop8A; C. Hinh_binh_hanh; D. Chuong_tình;
Câu 2: Để chạy chương trình Pascal ta sử dụng tổ hợp phím nào?
A. Alt+F4 B. Ctrl+F9 C. Ctrl+shift+F9 D. Shift+F3
Câu 3: Trong Pascal, ở các câu lệnh sau thì câu lệnh khai báo nào đúng?
A. var 3A: integer; B. const Pi:=3.14;
C. var a,b: integer; D. var CV= real;
Câu 4: Trong các câu sau, câu nào đúng?
A. 17 div 2 =5 B. 17 div 2 = 8 C. 14 mod 5 =2 D. 14 mod 5 = 2.8
Câu 5: Hãy phân biệt từ khóa và tên trong chương trình trên và đánh dấu "x" vào ô cột tương ứng trong bảng dưới đây?
Từ khóa Tên
Program .............. ........
CT_dau_tien .............. .........
begin ............. .........
Lop8A ............. ..........
Câu 6: Con người ra lệnh cho máy tính như thế nào? Chương trình máy tính là gì?
Câu 7: Viết các biểu thức toán học sau đây thành biểu thức trong Pascal?
Trong toán học -------------> Trong Pascal
a. 15.(4+30) ........................
b. ax+b+2 .........................
c. (a+b)^2+(c+d)^2 ..........................
d. x-y/2x ..........................
Câu 8: Tìm và sửa các lỗi sai trong chương trình Pascal sau:
Dòng 1 program Chuong_trinh; ......................
Dòng 2 uses crt; ......................
Dòng 3 var a,b:= integer; ......................
Dòng 4 c: real; ......................
Dòng 5 const phi:= 100; ........................
Dòng 6 begin .........................
Dòng 7 writeln('Nhap vao ........................
so a va b');
Dòng 8 realn(a,b); ........................
Dòng 9 c= a+b+phi; ........................
Dòng 10 writeln('Ket .......................
qua:' , c);
Dòng 11 end .......................
Câu 9: Viết chương trình tính diện tích hình chữ nhật có chiều rộng cạnh a, chiều dài cạnh b và diện tích là S. Gợi ý S=a.b

1
27 tháng 10 2020

Câu 1: D

Câu 2: B

Câu 3: C

Câu 4: B

Câu 5: Từ khóa: Program, begin. Tên: Ct_dau_tien, Lop8A

Câu 6:

- Con người ra lệnh cho máy tính bằng cách nhập các câu lệnh lên máy tính.

- Chương trình máy tính là một tập hợp các câu lệnh để thực hiện các công việc trên máy tính.

Câu 7:

a)15*(4+30)

b) a*x+b+2

c) sqr(a+b)+ sqr(c+d)

d) x-y/2*x

Câu 8:

Dòng 1: Không có lỗi sai.

Dòng 2: Không có lỗi sai.

Dòng 3: Sai. Sửa thành: var a,b:integer; ( var thì chỉ dùng ':' )

Dòng 4: Không có lỗi sai.

Dòng 5: Sai. Sửa thành: const phi=100; ( const thì chỉ dùng '=' )

Dòng 6: Không có lỗi sai.

Dòng 7: Sai. Sửa thành: readln(a,b); (viết sai chính tả từ 'readln')

Dòng 8: Sai. Sửa thành: c:=a+b+phi; (c được gán bằng a+b+phi thì phải dùng dấu':=')

Dòng 9: Không có lỗi sai.

Dòng 10: Sai. Sửa thành: end. (sau end cuối cùng phải có dấu '.')

Câu 9:

program dientich;

uses crt;

var a,b,S:integer;

Begin

clrscr;

write('nhap a,b: '); readln(a,b);

S:=a*b;

writeln('dien tich hinh chu nhat la: ',S);

readln;

end.