tính tổng của các số chẵn có ba chữ số chia hết cho 9
K
Khách
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.
Những câu hỏi liên quan
21 tháng 2 2022
const fi='dl.dat';
fo='kq.dat';
var f1,f2:text;
a:array[1..100]of integer;
i,n,dem1,dem2,t1,t2:integer;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,n);
for i:=1 to n do read(f1,a[i]);
dem1:=0;
dem2:=0;
for i:=1 to n do
begin
if a[i] mod 2=0 then inc(dem1)
else inc(dem2);
end;
t1:=0;
t2:=0;
for i:=1 to n do
begin
if (a[i] mod 6=0) then t1:=t1+a[i];
if (a[i] mod 9=0) and (a[i] mod 2<>0) then t2:=t2+a[i];
end;
writeln(f2,dem1,' ',dem2);
writeln(f2,t1);
writeln(f2,t2);
close(f1);
close(f2);
end.
21 tháng 2 2022
const fi='dl.dat';
fo='kq.dat';
var f1,f2:text;
a:array[1..100]of integer;
i,n,dem1,dem2,t1,t2:integer;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,n);
for i:=1 to n do read(f1,a[i]);
dem1:=0;
dem2:=0;
for i:=1 to n do
begin
if a[i] mod 2=0 then inc(dem1)
else inc(dem2);
end;
t1:=0;
t2:=0;
for i:=1 to n do
begin
if (a[i] mod 6=0) then t1:=t1+a[i];
if (a[i] mod 9=0) and (a[i] mod 2<>0) then t2:=t2+a[i]
end
writeln(f2,dem1,' ',dem2)
writeln(f2,t1)
writeln(f2,t2)
close(f1)
close(f2)
;-;
BB
2
3 tháng 5 2017
các chữ số chẵn chia hết cho 5 là: 90000 tổng = 9
( đó là cách nhanh nhất )
GN
GV Nguyễn Trần Thành Đạt
Giáo viên
10 tháng 1 2022
Có bn số chẵn có hai chữ số chia hết cho 3 ? 15 số
Có bn số lẻ có ba chữ số chia hết cho 9 ? 50 số
Có bn số có ba chữ số chia hết cho 5 ? 180 số
Có bn số chẵn có ba chữ số chia hết cho 2 và 5 ? 90 số
NN
10 tháng 1 2022
Có bn số chẵn có hai chữ số chia hết cho 3 ? 15 số
Có bn số lẻ có ba chữ số chia hết cho 9 ? 50 số
Có bn số có ba chữ số chia hết cho 5 ? 180 số
Có bn số chẵn có ba chữ số chia hết cho 2 và 5 ? 90 số
Cho mình 1 tick đúng nhé!
NV
0
Số số hạng ( 990-108):9+1=99
tổng (990+108)x99:2=54351
Đáp số : 54351
tôi ko biết