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 ạ 

Câu hỏi trong lớp Xem thêm