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.

1 tháng 1 2022

- Các biến dùng trong chương trình cần phải được khai báo ngay trong phần khai báo của chương trình.

 

- Việc khai báo biến bao gồm:

 

   + Khai báo tên biến

 

   + Khai báo kiểu dữ liệu

 

- Cú pháp: Var <tên biến> : <kiểu dữ liệu

 

 

23 tháng 3 2022

xin bn sửa hộ mk cái hình nền 🙏🏻

thay avatar đi bạn rồi mik giúp ko là bị khóa acc đấy

28 tháng 12 2020

Nếu đã khai báo hằng PI= 3,14 thì sẽ không thể gán lại trong phần thân nữa. Vì khi ta gán 1 giá trị mặc định thì ở phần thân chương trình không thể gán lại được nữa

9 tháng 5 2023

Phần tử trong mảng nha mn ghi nhầm

17 tháng 12 2021

Phát biểu nào dưới đây sai ?

(0.5 Points)

A. Trong một chương trình, phần khai báo có thể có hoặc không.

B. Trong một chương trình, phần thân chương trình có thể có hoặc không.

C. Trong một chương trình, phần thân chương trình bắt buộc phải có.

D. Cả A và C đều đúng.

Làm giúp mình bài này với ạ! Mình đag cần gấp!!Cho đoạn chương trình sau, hãy dùng iến mảng để khai báo biến cho chương trình:Var a, Thunhap_TB: real; i:integer;Begin         Thunhap_TB := 0;         for i:=1 to 50 do         begin             write('Thu nhap cua gia dinh thu ', i);             readln(a);             Thunhap_TB + a        end;        Thunhap_TB := Thunhap_TB/50;        for i := 1 to 50 do begin        write('Thu nhap cua gia dinh thu ',i); readln(a);       ...
Đọc tiếp

Làm giúp mình bài này với ạ! Mình đag cần gấp!!

Cho đoạn chương trình sau, hãy dùng iến mảng để khai báo biến cho chương trình:

Var a, Thunhap_TB: real; i:integer;

Begin

         Thunhap_TB := 0;

         for i:=1 to 50 do

         begin

             write('Thu nhap cua gia dinh thu ', i);

             readln(a);

             Thunhap_TB + a

        end;

        Thunhap_TB := Thunhap_TB/50;

        for i := 1 to 50 do begin

        write('Thu nhap cua gia dinh thu ',i); readln(a);

        writeln('Do lech so voi thu nhap TB la: ', a - Thunhap_TB)

        end;

End.

(Bài này là trong sgk tin 8/ tr71 nha mn nhưng mà cô giáo giao là thay vào biến kiểu mảng nhưng mình ko bt, bạn nào biết thì giải giúp mình nha, còn 2 ngày nữa là mình nộp cô r. Cảm ơn các bạn nhìu ạ <3 :333).

1

uses crt;

var a:array[1..50]of real;

i,n:integer;

t:real;

begin

clrscr;

for i:=1 to 50 do readln(a[i]);

t:=0; for i:=1 to 50 do t:=t+a[i];

writeln(t/50:4:2);

readln;

end.

24 tháng 2 2022

Cảm ơn ạ

 

16 tháng 11 2021

a: int m;

double q;

30 tháng 11 2021

A

30 tháng 11 2021

a)