Cho dãy số: 1; 5; 9 ; 13 ;..................... biết tổng trên có 100 số hạng? Em hãy sử dụng các câu lệnh của MSWLogo để tính trung bình cộng của các số trong dãy số đó.
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.
uses crt;
var n,i:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
if i mod 2=0 then write(i:4);
writeln;
for i:=1 to n do
if i mod 2=1 then write(i:4);
readln;
end.
Số số hạng của tông trên là:
(88-1):3+1=30 ( số hạng)
Đáp số: 30 số hạng
Từ : 1 → 9 có 9 chữ số
từ : 10 → 99 có = ( 99 - 10 ) : 1 + 1 = 90 x 2 = 180 chữ số
từ : 100 → 999 có = ( 999 - 100 ) : 1 + 1 = 900 x 3 = 2700 chữ số
từ : 1000 → 2017 có = ( 2017 - 1000 ) : 1 + 1 = 1018 x 4 = 4072 chữ số
Dãy đó có số chữ số là :
9 + 180 + 2700 + 4072 = 6961 ( chữ số )
Đáp số: 6961 chữ số
dãy số trên có số các số có 1 chữ số là:
(9-1):2+1=5 (so)
can so chu so de viet cac so co 1 chữ số là:
5x1=5(chữ số)
dãy số trên có số các số có 2 chữ số là:
(99-11):2+1=45 (so)
cần số các chữ số để viết các số có 2 chữ số là:
45x2=90 (chữ số)
day trên co so các số có 3 chữ số là:
(999-111):2+1=445 (so)
cần số các chữ số để viết các số có 3 chữ số là:
445x3=1335(chữ số)
dãy số trên có số các số có 4 chữ số ( tu 1111 ->2017) la:
(2017-1111):2+1=454 (so)
cần số các chữ số để viết các số có 4 chữ số (từ 1111->2017) la:
454x4=1816 (chữ số)
=> Day so tren co so chữ số là:
5+90+1335+1816=3246 (chữ số)
đáp số:3246 chữ số
to tbc
cs
make "n 1
make "dem 1
make "s 0
while [:dem<101][make "s :s + :n make "n :n + 4 make "dem :dem + 1]
make "tb :s/(:dem - 1)
rt 90 label[Trung binh cong la:] pu fd 200 pd label :tb ht
end
to tbc
cs
make "n 1
make "dem 1
make "s 0
while [:dem<101][make "s :s + :n make "n :n + 4 make "dem :dem + 1]
make "tb :s/(:dem - 1)
rt 90 label[Trung binh cong la:] pu fd 200 pd label :tb ht
end