program trung_binh;
uses crt;
var n,i:integer;
tb:real;
a:array[1..100] of integer;
begin
clrscr;
write('nhap n:');readln(n);
writeln('nhap day so:');
for i:=1 to n do
write('a[',i,']=');readln(a[i]);
end;
tb:=0;
for i:=1 to n do tb:=tb+a[i];
tb:=tb/n;
write('trung binh cong cua day so vua nhap la:',tb:2:2);
readln;
end.
NOCOPPY
Xin hay nhất@@
var n,s: integer;
a: array [1..100] of integer;
write('Nhap n= '); readln(n);
for i:=1 to n do begin
write('nhap so thu ',i,' :'); readln(a[i]);
for i:=1 to n do s:=s+i;
writeln('Tong la: ',s);
Giúp mình cái bài tập này với, "hơi khó" đối vs mik (ko xả điểm nha) Cho các số thực thuộc đơạn `[1;3]` và thỏa `a+b+c=6` Tìm max của `F=\frac{\sum a^2b^2+12abc+72}{\sum ab}-\frac{1}{2}abc`
Giải thích về hiện tượng nhiễm điện do cọ xát hai loại điện tích???
viết chương trình nhập mảng n số nguyên sau đó in ra màn hình tổng các số lớn hơn 5 và nhỏ hơn 100 HELP ME! (SẮP KIỂM TRA RỒI)
Chứng minh rằng: 99/1.5 + 99/5.9 + 99/9.13 + ... + 99/95.99 = 24,5 giúp đi mà😉
Câu 1 .Em hãy nêu nguyên nhân dẫn đến tai nạn giao thông?Hậu quả như thế nào Câu2 Làm thế nào để đảm bảo an toan khi tham gia giao thông? Câu 3 Pháp luật quy định công dân có quyền và nghĩa vụ gì trong học tập? Câu4 Quyền được pháp luật bảo hộ về tính mạng ,sức khoẻ ,danh dự và nhân phẩm của công dân được quy định như thế nào?
Mọi người ơi giúp em với . Tí em nộp bài rồi
giúp mik với. trl hết đó đúng nhất thì mik vote ctlhn kèm cả 5 sao nữa!!!!
giải dùm e với ạ đang cần gấp cảm ơn trước
c1: chọn hướng chuyển động của dao để tiện bề mặt xung quanh 1 khối nón có góc ở đỉnh là 60 độ vẽ sơ đồ chạy dao??,
Tại sao dưới thời Nguyễn diện tích canh tác được tăng thêm mà vẫn còn tình trạng nguyên nhân tay em có nhận xét gì về nông nghiệp thời Nguyễn? Liên hệ tình hình thực tế nước ta hiện nay?
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
