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.

15 tháng 11 2021

program chuong_trinh thiếu chấm phẩy

Sửa lại: program chuong_trinh;

4 tháng 11 2018

Tên chương trình: có dấu cách, sửa: tinh_tong;

Khai báo biến sai cấu trúc, sửa : thay := thành :

Lệnh gán biến tong sai, sửa : tong:=a+b;

End thiếu chấm, sửa : end.

7 tháng 11 2018

- program: có dấu cách

sửa: program tinh_tong;

- var: a, b, tong là các số khai báo kiểu nên không được dùng dấu gán

sửa: var a, b, tong : integer;

- phần begin: sai phần "tong = a+b", tổng phải được gán giá trị

sửa: tong := a+b;

- kết thúc chương trình: end viết thiếu

sửa: 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 ạ 

hãy cho biết chương trình pascal sau đây có đúng hay không ?vì sao?a) Program  Hieu_hai_so;             Begin                       Writeln(‘Hay nhap hai so’);                        Readln(a,b);                        Write(‘Hieu cua hai so la:‘,a-b);             Var a,b: Integer;              Endb) Program Tong_hai_so;             Begin                      Writeln(‘Hay nhap hai so’);                     Readln(a,b);                     Write(‘Tong cua hai so la:‘,a-b);             Var...
Đọc tiếp

hãy cho biết chương trình pascal sau đây có đúng hay không ?vì sao?

a) Program  Hieu_hai_so;

             Begin

                       Writeln(‘Hay nhap hai so’);

                        Readln(a,b);

                        Write(‘Hieu cua hai so la:‘,a-b);

             Var a,b: Integer;

              End

b) Program Tong_hai_so;

             Begin

                      Writeln(‘Hay nhap hai so’);

                     Readln(a,b);

                     Write(‘Tong cua hai so la:‘,a-b);

             Var a,b: Integer;

              End

1
14 tháng 12 2021

t hong bt cái này ă, mà chỗ m lớp 8 đc hc tin học vui quá ha, t ko bt ba cái vụ này lun:<

14 tháng 12 2021

chu choa