Cũng như tôi,mấy cậu học trò mới bỡ ngỡ đứng nép bên người thân, chỉ dám đi từng bước nhẹ. Họ như con chim non nhìn quãng trời rộng muốn bay, nhưng còn ngập ngừng e sợ. Họ thèm vụng và ước ao thầm được như những người học trò cũ, biết lớp, biết thầy để khỏi phải rụt rè trong cảnh lạ.

Hc tốt:3

?????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????

1.

Viet nam

2.

Hòa

1,

Việt Nam

2,

VIE 1-0 UAE

bạn phải viết 3 dòng trả lời

ng trên 10 sp k thì bạn đc 1 điểm

bn đã viết thành 2 dòng chx

Trả lời :

Trên vioedu k đổi đc tên nhé !!!

Mk cx hok trên đấy, kb k

~HT~

vào thông tin cá nhân máy ghi cài đặt thông tin ấn vào thông tin cá nhân rồi chuyển tên nhé

học tốt

ờm , /////// mk k bt nx

Ta thấy:

Giờ thứ nhất: 3 = 3 + 2 x 0

Giờ thứ hai: 5 = 3 + 2 x 0 + 2 x 1

giờ thứ ba: 9 = 3 + 2 x 0 + 2 x 1 + 2 x 2

Giờ thứ tư: 15 = 3 + 2 x 0 + 2 x 1 + 2 x 2 + 2 x 3

......

Vậy giờ thứ 20 sẽ phát ra: 3 + 2 x 0 + 2 x 1 + 2 x 2 + 2 x 3 + ... + 2 x 19 = 3 + 2 x (0 + 1 + 2 + 3 + ... + 19) = 3 + 2 x 190 = 383 (chiếc khẩu trang)

điểm trung bình mấy môn toán,tin,lí là 10 tất

điểm trung bình các môn của bản thân là 10 

uses crt;

var n,i,dem: integer;

tb: real;

A:array[1..1000] of integer;

writeln('Nhap do dai day: '); read(n);

writeln('Nhap cac phan tu cua day: ');

for i:=1 to n do

begin

writeln('a[',i,']='); read(a[i]);

end;

tb:=0;

for i :=1 to n do

begin tb:=tb+a[i]; dem:=dem+1; end;

tb:=tb/dem;

writeln('Gia tri Tb la: ',tb);

readln

@Lê Minh Vy:

-Sau dòng lệnh thứ 4 là lệnh Begin: dùng để chia giữa phần khai báo và phần thân và cuối chương trình thiếu lệnh end. để kết thúc chương trình.

-Lệnh nhập là readln không phải read: + dòng thứ 5 của bạn phải là readln(n); + dòng thứ 9 là readln(a[i]);

- Dòng 11,12,13 có thể gộp lên ở phần trên để đỡ chạy vòng for, rườm rà nhé :))

- Đề bài :viết chương trình sử dụng biến mảng để tính giá trị trung bình của n số nguyên được nhập từ bàn phím "và in ra dãy số nguyên đó" nên cuối bài, trước readln end. cần thêm lệnh

for i:=1 to n do write('day so nguyen la' a[i],' '); hoặc có thể bỏ ở vòng for ở trên gộp lại cũng được.

Program Tinh_tong ; 

Uses Crt;

Var i ,S: integer ; 

Begin

S: = 0 i;=0 ;

While  < 51 do begin 

                                       i : = i + 1 ;  

                                       S: = S + i ;

                                   end ;

 Write ('Tong la',S);

End.