Cáu 1: Chuong trinh sau day co hop le khong? Neu khong hay chinh sua lai cho hoan chinh. Program tinh hieu; Uses crt Var a, b: =integer; S: =real; Begin Writeln (' Nhap so nguyen duong a: ') Readln (a); Writeln (' Nhap so nguyen duong b: ') Readln (b); S:= a-b Writeln(' Hieu hai so nguyen duong a va b la: ',S:2:2) Readln End. giup mik voi a
2 câu trả lời
Mình đánh dấu thứ tự từ 1 xuống nha
(1) Tên không được chứa dấu cách
`=>` Sửa: Program tinhhieu;
Hoặc: Program tinh_hieu;
(2) Thiếu dấu ";" ở cuối dòng
`=>` Sửa: Uses crt;
(3) và (4) Đều dư dấu "="
`=>` Sửa: Var a, b:integer;
S:real;
(6) và (7) Đều thiếu dấu ";" sau lệnh writeln
`=>` Sửa:Writeln (' Nhap so nguyen duong a: '); Readln (a);
Writeln (' Nhap so nguyen duong b: '); Readln (b);
(8) và (9) Thiếu dấu ";" ở cuối dòng
`=>` Sửa: S:=a-b;
Writeln(' Hieu hai so nguyen duong a va b la: ',S:2:2);
Program tinh hieu;
Uses crt
Var a, b: =integer;
S: =real;
Begin
Writeln (' Nhap so nguyen duong a: ') Readln (a);
Writeln (' Nhap so nguyen duong b: ') Readln (b);
S:= a-b
Writeln(' Hieu hai so nguyen duong a va b la: ',S:2:2)
Readln
End.
chương trình ko hợp lệ vì ở dòng 2
Uses crt sẽ phải thêm dấu ;
S:= a-b thêm dấu ;
ở dưới là code đã hoàn chỉnh ạ