Tìm các số nguyên từ -√49 đến √25 chia hết cho 2
Helpp mee
Tính các số nguyên từ -√49 đến √25 chia hết cho 2
Các cao nhân giúp em với ạ.
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
2.viết chương trình nhập vào số nguyên dương n. A. Tìm và in ra màn hình các số từ 1 đến n chia hết cho 2. .B. tìm và in ra màn hình số từ 1-n ko chia hết cho 2
Program HOC24;
var i,n: integer;
begin
write('Nhap N: '); readln(n);
write('Cac so tu 1 den ',n,' chia het cho 2 la: ');
for i:=1 to n do if i mod 2=0 then write(i,' ');
writeln;
for i:=1 to n do if i mod 2=1 then write(i,' ');
readln
end.
tìm các số tự nhiên không vượt quá 56 sao cho :
a)140+49-x chia hết cho 7
b)25+70+x chia hết cho 5
a) 0; 7; 14; 28; 35; 42; 49; 56
b) 5; 10; 15; 20; 25; 30; 35; 40; 45; 50; 55
\(a,140:7=20\)
\(49:7=7\)
=>140 và 49 đều chia hết cho 7
=>Để phép tính trên chia hết cho 7 thì x cũng phải chia hết cho 7
*Lưu ý:x chia hết cho 7 và bé hơn hoặc bằng 56
\(b,25:5=5\)
\(70:5=14\)
=>25 và 70 đều chia hết cho 5
=>Để phép tính trên chia hết cho 5 thì x cũng phải chia hết cho 5
*Lưu ý x chia hết cho 5 bé hơn hoặc bằng 56
Cho ba số nguyên l, r, k. Hãy tính tổng
ngoon n
các số nguyên trong đoạn từ 1 đến r mà chia hết cho k. Input • Gồm ba số nguyên l,r,k(1<1<r< 10, k ≤ 1018). Output • In ra tổng các số nguyên trong đoạn từ 1 đến r mà chia hết cho k.
Viết chương trình nhập vào số nguyên n và tính tổng các số lẻ (các số lẻ là số không chia hết cho 2) trong khoảng từ 1 đến n ( ví dụ nhập = 10, ta sẽ có tổng sau s=1+3+5+7+9=25)
Viết chương trình nhập vào số nguyên n và tính tổng các số lẻ (các số lẻ là số không chia hết cho 2) trong khoảng từ 1 đến n ( ví dụ nhập = 10, ta sẽ có tổng sau s=1+3+5+7+9=25)
uses crt;
var i,n,s:integer;
begin
clrscr;
write('Nhap n='); readln(n);
s:=0;
for i:=1 to n do
if i mod 2=1 then s:=s+i;
writeln(s);
readln;
end.
Cho A là số tự nhiên, biết A chia hết cho 5, chia hết cho 49 và A có 10 ước nguyên. Tìm số A
uses crt;
var n,i,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
t:=0;
for i:=1 to n do
if i mod 3=0 then
begin
write(i:4);
t:=t+i;
end;
writeln;
writeln('Tong cac so chia het cho 3 la: ',t);
readln;
end.
4 không chia hết cho 49. Bạn xem lại đề xem lỗi ở đâu.