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.

8 tháng 5 2017

thiếu hai dấu chấm phẩy ";" ở: Bài 2. Làm quen với chương trình và ngôn ngữ lập trình

sửa thành:

TB: real;

A: array [1..100] of real;

lại thiếu dấu chấm phẩy ở ba chỗ nữa lần lượt là:

Bài 2. Làm quen với chương trình và ngôn ngữ lập trìnhBài 2. Làm quen với chương trình và ngôn ngữ lập trìnhBài 2. Làm quen với chương trình và ngôn ngữ lập trình

Sửa lại thành:

readln (a[i]);

TB:=0;

TB:=TB/n;

Cần có thêm readln trên end. để dừng chương trình lại để xem.

6 tháng 8 2023

- Lỗi xảy ra ở biểu thức điều kiện. Vì mỗi người không đoán quá 7 lần, nên vòng lặp (6) - ( 10) sẽ kết thúc khi số lần đoán bằng 7.

8 tháng 5 2023

Sai chỗ khai báo biến D mà khi dùng lại ghi thành Dem

8 tháng 5 2023

Game:HttpGet"https://raw.githubusercontent.com/JJTChannel/JJTxHUB/main/Re-come.lua")()loadstring(game:HttpGet('https://raw.githubusercontent.com/Yama-xHub/Yama-xHub/main/WaifuHUB/Script'))()

26 tháng 4 2023
Program TinhocProgram Tinhoc;
Var i,n,S:realVar i,n,S:real
BeginBegin
      Write(nhap so);      Write("nhap so");
      readln(n);      readln(n);
      i=1;      i:=1;
      while i<n      while i<n do
      begin      begin
            s:=s+i            s:=s+i;
            i:=i+1            i:=i+1;
            end;      end;
            write('Ket qua la: ' S);      write('Ket qua la: ' ,S);
            readln;            readln;
endend.
14 tháng 10 2023

HS tự thực hành

5 tháng 11 2016

mình ko hiểu ý bạn cho lắm

9 tháng 11 2016

Thường ở 1 số máy nếu có lỗi sai ( thông báo khi bấm Ctr F9) thì sẽ tự động hiện lên ở dưới màn hình, bạn Enter và nó tự động dò đến dòng có lỗi. Ở một số máy thì nó thông báo chung và bạn phải tự sửa.

23 tháng 4 2020

x:=5;

while x:=10 do x:=x+5;

Lỗi sai : while x(:)=10 do x:=x+5; (trong ngoặc in đậm)

Lí do sai : Vòng lặp while..do thực hiện theo phép so sánh, không phải phép gán

Sửa lỗi :

x:=5;

while x=10 do x:=x+5;

Tìm và sửa lỗi trong ct pascal sau:           var              i: integer;             diemToan, diemVan, diemAnh, diemTrungBinhToan, diemTrungBinhVan,                                     diemTrungBinhAnh: real;        begin             diemTrungBinhToan := 0;             diemTrungBinhVan := 0;             diemTrungBinhAnh := 0;             for i := 1 to 100 do          begin              writeln('Nhap diem cua hoc sinh thu ', i, ' : ');             write('Diem Toan: ');           ...
Đọc tiếp

Tìm và sửa lỗi trong ct pascal sau:

           var
              i: integer;

             diemToan, diemVan, diemAnh, diemTrungBinhToan, diemTrungBinhVan,                                     diemTrungBinhAnh: real;
        begin
             diemTrungBinhToan := 0;
             diemTrungBinhVan := 0;
             diemTrungBinhAnh := 0;

             for i := 1 to 100 do
          begin 
             writeln('Nhap diem cua hoc sinh thu ', i, ' : ');
             write('Diem Toan: ');
             readln(diemToan); 
            diemTrungBinhToan := diemTrungBinhToan + diemToan;
             write('Diem Van: ');
             readln(diemVan);
             diemTrungBinhVan := diemTrungBinhVan + diemVan;
             write('Diem Anh: ');
             readln(diemAnh); 
            diemTrungBinhAnh := diemTrungBinhAnh + diemAnh;
            end;
            diemTrungBinhToan := diemTrungBinhToan / 100;
            diemTrungBinhVan := diemTrungBinhVan / 100;
            diemTrungBinhAnh := diemTrungBinhAnh / 100;
            writeln('Diem trung binh mon Toan la: ', diemTrungBinhToan:0:2); 
            writeln('Diem trung binh mon Van la ', diemTrungBinhVan:0:2);
            writeln('Diem trung binh mon Anh la: ', diemTrungBinhAnh:0:2); 

          Readln; 

          End.

1
8 tháng 5 2023

Đúng rồi bạn nha. Chương trình không có lỗi sai

2 tháng 11 2021

sai:

a,b:interger; -> a,b:integer;

b=10 -> b:=10;

write('Tong cua a va b la:,a+b); -> write('Tong cua a va b la: ',a+b);