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.

11 tháng 11 2022

program tinhhieu sai vì thiếu dấu ";". Sửa lại: program tinhhieu;

Ues crt sai. Sửa lại: Uses crt;

Var t,a,b:integer sai. Sửa lại: Var t,a,b:integer;

Begen sai. Sửa lại: Begin

Writenln( 'nhap a va b'); sai. Sửa lại: Writeln('Nhap a va b');

t=a-b sai. Sửa lại: t:=a-b;

writeln('tong la, t); sai. Sửa lại: writeln('tong la ',t);

End sai. Sửa lại: End.

 

24 tháng 6 2018

a) Program chuvi_duongtron;

b) const pi = 3.14;

c) write(‘nhap ban kinh r = ‘);

d) Thiếu End.

31 tháng 10 2017

a) uses crt;

b) var dt, r: real;

c) Thiếu Begin

d) dt:= pi*sqr(r);

10 tháng 7 2017

a) Program chuvi_duongtron;

b) const pi = 3.14;

c) readln(r);

d) Thiếu End.

21 tháng 8 2018

a) uses crt;

b) var dt, r: real;

c) Thiếu readln(r);

d) dt:= pi*sqr(r);

29 tháng 8 2023

Lỗi 1: Dòng uses : crt; - Lỗi cú pháp do dấu hai chấm : không cần thiết. Sửa lại thành uses crt;.

Lỗi 2: Dòng var dt, r = real; - Lỗi khai báo biến không đúng cú pháp. Sửa lại thành var dt, r: real;.

Lỗi 3: Dòng clrscr; - Lỗi cú pháp do sử dụng hàm clrscr trong môi trường không hỗ trợ. Nếu muốn xóa màn hình, có thể sử dụng clrscr trong IDE hoặc xóa dòng này nếu không cần thiết.

Lỗi 4: Dòng writeln('Dien tich hinh tron co ban kinh ', r:0:2, ' la: ', dt:0:2); - Lỗi cú pháp do sử dụng sai định dạng khi in giá trị. Sửa lại thành writeln('Dien tich hinh tron co ban kinh ', r:0:2, ' la: ', dt:0:2:2); để in diện tích với đúng định dạng số thập phân.

KTC_HK1;

S: real;

Writeln('Nhap a='); 

14 tháng 1 2022

- Program KTCHK1;

- Program KTC_HK1;

- Uses crt;

- Var a, S: Integer;

- Writeln('Nhap a = ');

- Writeln('S = ' , S);

a) 

Tham số hình thức là biến được liệt kê trong danh sách tham số (thường nằm tại phần đầu của định nghĩa chương trình con)

Tham số thực sự là giá trị cụ thể của biến đó tại thời gian chạy.

15 tháng 4 2021

nói rõ hơn đc kh b

 

6 tháng 5 2020

Bn sửa giúp mình luôn dc kh... Cảm ơn bn

\n

Lỗi 1: Sai từ khóa(Programe)

Lỗi 2: Dùng cú pháp hằng mà lại dùng từ khóa khai báo biến(Var a=real;)

Lỗi 3: Dùng sai từ đọc dữ liệu(Realn)

Lỗi 4: Thiếu dấu : ở cú pháp gán

Lỗi 5: End là từ khóa để kết thúc bài mà lại có dấu;

Chương trình sau giải quyết vấn đề gì?  Var   a:array[1..4] of integer;  Begin        For i:=1 to 4 do        Begin           Write('nhap cac phan tu A[',i,']:');            readln (a[i]);        End;        For i:=1 to 3 do        For j:= I+1 to 4 do             If a[i]> a[j] then               Begin                   tg:=a[i];                   a[i]:=a[j];                   a[j]:=tg;               end;         For I:=1 to  4 do         Write(a[i]);    End.Select one:a. sắp xếp...
Đọc tiếp

Chương trình sau giải quyết vấn đề gì?

  Var   a:array[1..4] of integer;

  Begin

        For i:=1 to 4 do

        Begin

           Write('nhap cac phan tu A[',i,']:');

            readln (a[i]);

        End;

        For i:=1 to 3 do

        For j:= I+1 to 4 do

             If a[i]> a[j] then

               Begin

                   tg:=a[i];

                   a[i]:=a[j];

                   a[j]:=tg;

               end;

         For I:=1 to  4 do

         Write(a[i]);

    End.

Select one:

a. sắp xếp các phần tử của mảng theo trật tự tăng dần

b. Tìm Max

c. sắp xếp các phần tử của mảng theo trật tự giảm dần

d. Chương trình có lỗi

0