Tính tổng các số nguyên x
12x<2017 và x chia hết cho 5
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.
a)
Các số nguyên x thỏa mãn là:
\(x\in\left\{-10;-9;-8;-7;-6;-5;-4;-3;-2;-1;0;1;2;3;4;5;6;7;8\right\}\)
Tổng các số nguyên trên là:
\((8-10).19:2=-19\)
b)
Các số nguyên x thỏa mãn là:
\(x\in\left\{-9;-8;-7;-6;-5;-4;-3;-2;-1;...;6;7;8;9;10\right\}\)
Tổng các số trên là:
\((10-9).20:2=10\)
c) Các số nguyên x thỏa mãn là:
\(x\in\left\{-15;-14;-13;-12;-11;-10;-9;-8;-7;-6;-5;...;12;13;14;15;16\right\}\)
Tổng các số nguyên đó là:
\((16-15).32:2=16\)
tổng các số nguên âm lớn nhất có 1,2,3 chữ số là
(-1)+(-10)+(-100)=-111
tổng các số nguyên âm nhỏ nhất có 1,2,3 chữ số là
(-9)+(-99)+(-999)=-1107
tổng các sso âm có 2 chữ sso là
(-10)+(-11)+...(-99)
số số hạng là
[(-99)-(-10)]:1=89(số)
phần sau tự giải nha bận chút
=
a) Số nguyên âm lớn nhất có 1 chữ số là (-1)
Số nguyên âm lớn nhất có 2 chữ số là (-10)
Số nguyên âm lớn nhất có 3 chữ số là (-100)
=>Tổng : (-1)+(-10)+(-100)=(-111)
Các câu khác làm tương tự nha bn
var a: array[1..10000] of longint; s: longint;
begin
repeat
readln(a[i]);
s:=s+a[i];
until a[i]=0;
write(s);
readln
end.
uses crt;
var a,s:integer;
begin
clrscr;
s:=0;
repeat
write('Nhap a='); readln(a);
s:=s+a;
until a=0;
writeln(s);
readln;
end.
Câu 1:
uses crt;
var a:array[1..100]of integer;
i,n,t: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 mang la: ',t);
readln;
end.
Câu 2:
uses crt;
var a:array[1..100]of integer;
i,n,t: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
if a[i] mod 2=0 then t:=t+a[i];
writeln('Tong cac so chan la: ',t);
readln;
end.
Phép tính là :
\(\frac{-\left(99+1\right).50}{2}+\frac{\left(98+2\right).49}{2}\)
\(=-50\)
****
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.