tính tổng dãy số 1,2,3,5,8,13,21,34,55
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 a:array[1..100]of integer;
i,n,t,t1:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
t:=t+a[i];
writeln('Tong cac so trong day la: ',t);
t1:=0;
for i:=1 to n do
if a[i] mod 2=0 then t1:=t1+a[i];
writeln('Tong cac so chan trong day la: ',t1);
readln;
end.
sssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss
Dãy 1:
Giải:
Số hạng thứ 100 của dãy là:
2+(100-1).3=299
Tổng của dãy số trên là:
(299+2).100:2=15050
Vậy tổng của dãy 1 là 15050
mỗi số cách nhau 3 đơn vị .
Số số hạng là :
(1009-1) : 2 + 1 = 505(số hang)
Tổng :
(1009+1) x 505 : 2 = 255025
Đ/s: 255025
a)dãy 1;4;7;10;13;.....;94;97;100 có (100-1):3+1=34 số số hạng
suy ra tổng của dãy là: (100+1).34:2=1717
b)các số lẽ từ 1đến 1995 có số số hạng là: (1995-1):2+1=998
suy ra tổng của dãy là; (1995+1).998:2=996004
c)dãy 1;3;5;.....;1989 có số số hang là: (1989-1):2+1=995
suy ra tổng của dãy là: (1989+1).995:2990025
Dãy 1 : 2 ,5 ,8,11
giải
đây là dãy số cách đều ..........
Số số hạng( số đầu - số cuối ) : khoảng cách +1 =
tổng của dãy: ( số đầu + số cuối ) x số số hạng : 2 =
a, Số số hạng là :
( 119 - 7 ) : 4 + 1 = 29 số hạng
b, Số thứ 20 là số 83
c, Tổng = ( 119 + 7 ) . 29 : 2 = 1827
xin tiick
Uses crt;
var max,min,n,i,m,n: longint;
a: array[1..100] of longint
begin clrscr;
for i:=1 to n do begin
if(a[i] mod 2=0) then m:=m+a[i];
if(a[i] mod 2<>0) then n:=n+a[i];
end;
max:=a[1];
min:=a[1];
for i:=1 to n do begin
if(max<a[i]) then max:=a[i];
if(min>a[i]) then min:=a[i];
end;
Writeln('Tong cac phan tu chan: ',m);
Writeln('Tong cac phan tu le: ',n);
Writeln('Phan tu co gia tri lon nhat: ',max);
Writeln('Phan tu co gia tri nho nhat: ',min);
readln;
end.
Uses crt;
var max,min,n,i,m,n: longint;
a: array[1..100] of longint
begin clrscr;
for i:=1 to n do begin
if(a[i] mod 2=0) then m:=m+a[i];
if(a[i] mod 2<>0) then n:=n+a[i];
end;
max:=a[1];
min:=a[1];
for i:=1 to n do begin
if(max<a[i]) then max:=a[i];
if(min>a[i]) then min:=a[i];
end;
Writeln('Tong cac phan tu chan: ',m);
Writeln('Tong cac phan tu le: ',n);
Writeln('Phan tu co gia tri lon nhat: ',max);
Writeln('Phan tu co gia tri nho nhat: ',min);
readln;
end.
Ta có : 1 + 2 + 3 + 5 + 8 + 13 + 21 + 34 + 55
= (1+2) + 3 + (5+8) + 13 + (21+34) + 55
= 3 + 3 + 13 + 13 + 55 + 55
= 3 x 2 + 13 x 2 + 55 x 2
= 6 + 26 + 110
= 142
thank