Lập trình đơn giản

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Ma Phan Đức

Hãy tìm lỗi trong ví dụ dưới đây và sửa lại cho đúng:

Mỗi dòng là 1 ý nhá mn, không phải đây là cả một chương trình đâu ạ ! mong mn giúp

Program Vi_du;

Var a,b,c,s: Integer;

Begin

Write(\(`\)nhap chieu dai a =\('\)); readln(\(` \)a\('\))

Write(\(`\)nhap chieu dai b =\('\)); readln(\(`\)b');

S:=a*b

C:=(a+b)x2;

Write(\('\)dien tich hinh chu nhat la: \(`,\) \(`\)S\('\));

Write(\(' \)chu vi hinh chu nhat la: \('\)\(,'\)C\('\));

Readln;

End

Minh Lệ
22 tháng 11 2020 lúc 16:58

Dòng 6: Lỗi kết thúc lệnh gán không có dấu ; . Sửa : S:=a*b;

Dòng 7: Lỗi sai phép nhân đối với Pascal. Sửa: C:=(a+b)*2;

Dòng 8: Để in ra giá trị của biến S thì không được bỏ dấu nháy. Sửa write('Dien tich hinh chu nhat la : ',S);

Dòng 9: Để in ra giá trị của biến C thì không được bỏ dấu nháy. Sửa write('Dien tich hinh chu nhat la : ',C);

Khách vãng lai đã xóa
Kiều Vũ Linh
25 tháng 11 2020 lúc 20:21

Dòng cuối cũng sai.

Sửa lại thành End. (lệnh End có dấu chấm ở cuối)

Khách vãng lai đã xóa

Các câu hỏi tương tự
NHÓC BOSS GAMING
Xem chi tiết
kevin khánh
Xem chi tiết
Mikan Sakura
Xem chi tiết
Lovers
Xem chi tiết
Ba chú heo con
Xem chi tiết
Nguyễn Xạ Điêu
Xem chi tiết
Nguyễn Xạ Điêu
Xem chi tiết
hoàng nguyễn phương thảo
Xem chi tiết
trang huynh
Xem chi tiết
Cold Wind
Xem chi tiết