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.

2 tháng 11 2021

Program bai tap 1; -> Program Bai_tap_1;

Uses CRT -> Uses CRT;

Var a;=integen; -> Var a: integer;

b;=real; -> b: real;

Constc;=3; -> Const c=3;

Begin

a:=200;

b:=a/c;

Readln;

End -> End.

2 tháng 11 2021

Program bai tap 1; -> Program Bai_tap_1; Uses CRT -> Uses CRT; Var a;=integen; -> Var a: integer; b;=real; -> b: real; Constc;=3; -> Const c=3; Begin a:=200; b:=a/c;

a)

*Các lỗi sai là:

-Sai thứ tự các lệnh (begin trước, uses crt sau)

-Program vd: thiếu dấu ;

-Writeln('Chao cac ban!'): thiếu dấu ;

-Sai thứ tự các lệnh(end trước readln sau)

-Readln: thiếu ;

*Sửa lại:

Program vd;
Uses crt;
Begin
Clrscr;
Writeln('Chao cac ban!');
Readln;
End.

b)

*Các lỗi sai là:

-Var a,b:=integer; Sai vì có dấu =

-Const c:=3; Sai vì có dấu :

-a:=200: Sai vì thiếu dấu ;

-b:=a/c: Biến b Sai kiểu dữ liệu;

-Writeln(b): Sai vì thiếu dấu ;

-Readln: Sai vì thiếu dấu ;

*Sửa lại:

Var a,b:integer;
Const c=3;
Begin
a:=200;
b:=a+c;
Writeln(b);
Readln;
End.

15 tháng 11 2021

program chuong_trinh thiếu chấm phẩy

Sửa lại: program chuong_trinh;

30 tháng 10 2020

-Thứ nhất thiếu tên chương trình

- Thứ 2 sai ở var a,b:=byte sửa lại thành a,b: byte;
- Thứ 3 sai ở const c:3; sửa lại thành const c=3;

30 tháng 10 2020

-Trong pascal thiếu tên ct(vd: program baihoc;) thì ct vẫn chạy ok.

- var thì phải dùng ":" và thiếu ";". Sửa lại: var a,b:byte;

- const thì phải dùng "=". Sửa lại: const c=3;

-trong ct thiếu clrscr; thì ko sai nhưng sẽ rất khó nhìn.

-Sau readln thiếu ";". Sửa lại: readln;