b)tính tổng các số nguyên từ -3 đến 4
1. Tìm tổng của số nguyên lớn nhất có 2 chữ số và số nguyên nhỏ nhất có 3 chữ số
2. Tính tổng của các số chẵn dương từ 4 đến 12 và các số lẻ âm từ - 5 đến -13
biết làm mỗi phần 1 thôi
4+5+6+......+12
=12-4:1+1.12-4=72
dấu . cạnh số +1 là nhân tự viết theo cách cô giáo day
1. Số nguyên lớn nhất có 2 chữ số là :-10
Số nguyên nhỏ nhất có 3 chữ số là :-999
Vậy tổng của số nguyên lớn nhất có 2 chữ số và số nguyên nhỏ nhất có 3 chữ số là :(-10)+(-999)=-1009
phần hai chưa làm được sorry bạn nha! HỌC TỐT
Số nguyên lớn nhất phải là 99 chứ
câu 1: Cho 1 số nguyên n
- Hãy tính tổng các số từ 1 đến N
- Hãy tính tổng các số chẵn từ 2 đến N
câu 2: Cho 2 số nguyên a và b:
- Tìm Bôi chung nhỏ nhất của a và b
câu 3: Cho 2 số nguyên p và q (p<q). Hãy in ra màn hình các số nguyên tố trong khoảng p và q. Hãy cho biết có bao nhiêu số nguyên tố?
GIÚP MÌNH VỚI MÍ BẠN ƠI:(((((
Câu 1:
uses crt;
var n,i,t1,t2:integer;
begin
clrscr;
write('Nhap n='); readln(n);
t1:=0;
t2:=0;
for i:=1 to n do
begin
t1:=t1+i;
if i mod 2=0 then t2:=t2+i;
end;
writeln('Tong cac so tu 1 den ',n,' la: ',t1);
writeln('Tong cac so chan tu 1 den ',n,' la: ',t2);
readln;
end.
Câu 2:
uses crt;
var a,b,i,bcnn:longint;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
bcnn:=a*b;
for i:=a*b-1 downto 1 do
if (i mod a=0) and (i mod b=0) then
begin
if bcnn>i then bcnn:=i;
end;
writeln(bcnn);
readln;
end.
Câu 3:
uses crt;
var p,q,i,j,kt,dem:integer;
begin
clrscr;
write('Nhap p='); readln(p);
write('Nhap q='); readln(q);
dem:=0;
for i:=p to q do
if i>1 then
begin
kt:=0;
for j:=2 to i-1 do
if i mod j=0 then kt:=1;
if kt=0 then
begin
write(i:4);
inc(dem);
end;
end;
writeln;
writeln('Co ',dem,' so nguyen to');
readln;
end.
tính
a)Tổng tất cả các số nguyên từ -7 đến 6
b)Tổng tất cả các số nguyên không nhỏ hơn -4 nhưng nhỏ hơn 2
Bài làm:
a) Các số nguyên từ -7 đến 6 là: {-7;-6;-5;-4;-3;-2;-1;0;1;2;3;4;5;6}
Ta có: (-6+6)+(-5+5)+(-4+4)+(-3+3)+(-2+2)+(-1+1)+0+(-7)
= 0.7+(-7)
= -7
b) Các số nguyên không nhỏ hơn -4 nhưng nhỏ hơn 2 là: {-4;-3;-2;-1;0;1}
Ta có: -4+(-3)+(-2)+(-1)+0+1= (-1+1+0)+ (-9)
= -9
nhập từ 2 số nguyên a,b (a <b) tinh tổng từ a đến b .Tính tổng các số chẵn lẻ từ a đến b tìm ra các số chia hết cho 7 từ a đến b
Tính tổng các số nguyên âm từ -10 đến -15 và tính tổng các số nguyên dương từ 8 đến 14.
VCT nhập vào 2 số nguyên A và B (A<=B) tính tổng các số chia hết cho 3 từ A đến B
program hotrotinhoc;
var n,i.d: integer;
t: longint;
begin
readln(n);
t:=0; d:=0;
for i:=1 to n do
if i mod 3=0 then t:=t+i;
writeln('Tong cac so chia het cho 3 tu 1 den n la:',t);
for i:=1 to n do
if i mod 3=0 then inc(d);
write('Co ',d,' so chia het cho 3 tu 1 den N');
readln
end.
Bạn tham khảo nhé!
uses crt;
var a,b,t,i:integer;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
t:=0;
for i:=a to b do
if i mod 3=0 then t:=t+i;
writeln(t);
readln;
end.
Viết chương trình tính tổng các số nguyên được nhập từ bàn phím cho đến khi nhập số 0 thì dừng.
Input:
Nhập các số nguyên.
Output:
Tổng các số vừa nhập
Ví dụ
Input
7 3 2 4 0
Output
16
Program HOC24;
var i,n: integer;
t: longint;
begin
read(n);
t:=n;
if n<>0 then
begin
while n<>0 do
begin
read(n);
t:=t+n;
end;
end;
readln;
readln
end.
Cách khác:
uses crt;
var n,t:integer;
begin
clrscr;
t:=0;
repeat
write('n='); readln(n);
t:=t+n;
until n=0;
writeln(t);
readln;
end.
Câu 1: Viết chương trình nhập vào số nguyên n có 2 chữ số (Nếu nhập sai thì nhập lại).
a) In ra các số chẵn từ 0 đến n
b) In ra các số lẽ từ 1 đến n
c) Tính tổng các số chẵn từ 0 đến n
d) Tính tổng các số lẻ từ 1 đến n
Bài 6.5.Tính tổng tất cả các số nguyên x biết:
a) -10 < x < 17 ; b) -15 < x < 15.
Bài 6.6.Tính tổng tất cả các số nguyên x biết:
a) -10 < x < 10 ; b)-10 < x< 10;
c) -10 ≤ x<10; d)-10 ≤ x ≤ 10.
Bài 6.7.Tính tổng của các số chẵn dương từ 4 đến 12 và các số lẻ âm từ -5 đến -13.
Bài 6.8.Tính tổng của các số nguyên dương 25 đến 1000 và các số nguyên âm từ -37 đến – 1200.
ai nhanh mik tích nhé