tính kết quả của dãy số ; 100-1+99-2+98-3+....+55-55
Chương trình pascal thực hiện các yêu cầu sau: nhập giá trị của các phần tử một dãy số gồm n phần tử, tính tích các phần tử của dãy số đó và không báo kết quả ra màn hình và tính trung bình cộng các phần tử của dãy số đó và thông báo kết quả ra màn hình
uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
s:real;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
s:=1;
for i:=1 to n do
s:=s*a[i];
writeln('Tich la: ',s:0:0);
t:=0;
for i:=1 to n do
t:=t+a[i];
writeln('Trung binh la: ',t/n:4:2);
readln;
end.
Bài 1: VCT đếm các phần tử là số nguyên âm chẵn của dãy b số nguyên từ bàn phím. Sau in kết dãy số và kết quả r màn hình
Bài 2: VCT tính tổng các phần tử chia hết cho 5 của dãy n sô nguyên nhập từ bàn phím. Sau đó in dãy số và kết quả r màn hình
(Giúp mik vs ạ)
Viết chương nhập vào dãy gồm N số nguyên. Tính và đưa ra màn hình kết quả trung bình cộng của những số lẻ trong dãy. Kết quả làm tròn đến 2 chữ phần thập phân
VCT đếm các phần tử là số nguyên dương lẻ của dãy n số nguyên nhập từ bàn phím. Sau đó in dãy số và kết quả r màn hình
Bài 2: VCT tính tích các phần tử là số chẵn của dãy n số nguyên nhập từ bàn phím. Sau đó in dãy số và kết quả r màn hình
Bài 1: VCT đếm các phần tử là số nguyên âm chẵn của dãy n số nguyên từ bàn phím. Sau đó in kết quả ra màn hình Bài 2:VCT tính tổng các phần tử chia hết cho 5 của dãy n số nguyên nhập từ bàn phím. Sau đó in dãy số và kết quả r màn hình Bài 3: VCT tính tích các phần tử là số chẵn của dãy n nhập từ bàn phím và in kết quả r màn hình (Giúp mik vs ạ)
Bài 1:
Program HOC24;
var a: array[1..1000] of integer;
i,n,d: integer;
begin
write('Nhap so phan tu: '); readln(n);
for i:=1 to n do
begin
write('Nhap so thu ',i,': '); readln(a[i]);
end;
for i:=1 to n do if (a[i]<0) and (a[i] mod 2=0) then d:=d+1;
write('Co ',d,' so nguyen am chan trong day so');
readln
end.
Bài 2:
Program HOC24;
var a: array[1..1000] of integer;
i,n: integer;
t: longint;
begin
write('Nhap so phan tu: '); readln(n);
for i:=1 to n do
begin
write('Nhap so thu ',i,': '); readln(a[i]);
end;
t:=0;
for i:=1 to n do if a[i] mod 5=0 then t:=t+a[i];
write(Tong la: ',t);
readln
end.
Bài 3:
Program HOC24;
var a: array[1..1000] of integer;
i,n: integer;
t: longint;
begin
write('Nhap so phan tu: '); readln(n);
for i:=1 to n do
begin
write('Nhap so thu ',i,': '); readln(a[i]);
end;
t:=1;
for i:=1 to n do if (a[i] mod 2=0) then t:=t*a[i];
write('Tich la: ',t);
readln
end.
hãy đặt phép tính cộng trừ vào dãy số sau để có kết quả của dãy tính bằng 1 : 1;2;3;4;....;2009=1
Chữ số tận cùng của kết quả dãy tính 1981+1982+1983+....+1989 là chữ số nào?...........
số hạng của dãy là :
(01989-1981):1+1=9 số hạng
tổng của dãy là:
(1989+1981) x 9 :2=17865
vậy chữ số tận cùng của kết quả là 5
\(1-7+13-19+25-31+......................\)
dãy trên có 40 số hạng
tìm số hạng thứ 40 của dãy và tính kết quả của dãy số đó
Số hạng thứ 40 của day là:
(40 - 1).6+1=235
Ta có:
1-7+13-19+25-31+...+235
= (1+13+25+...+235)-(7+19+31+...+229)
={1+235.[(235-1):12+1]:2} - {7+229.[(229-7):12+1]:2}
= {1+235.20,5 :2} -{7+229.19,5:2}
=2409,75- 2239,75
= 170
cho dãy số 2+4+6+8+...+122+124.Tính kết quả dãy số này
Dãy trên có SSH là :
( 124 - 2 ) : 2 + 1 = 62
Tổng của dãy là :
( 124 + 2 ) x 62 : 2 = 3906
Đáp Số : 3906
Dãy trên có SSH là :
( 124 - 2 ) : 2 + 1 = 62
Tổng của dãy là :
( 124 + 2 ) x 62 : 2 = 3906
Đáp Số : 3906
Dãy trên có SSH là :
(124 - 2) : 2 + 1 = 62
Tổng của dãy là :
(124 + 2) x 62 : 2 = 3906
Đáp số : 3906