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.
Đề không cho kiểu dữ liệu gì nên mình vt longint
var A,B,C,D:longint;
begin
write('nhap A='); readln(A);
write('nhap B='); readln(B);
write('nhap C='); readln(C);
write('nhap D='); readln(D);
if A mod 2 = 0 then writeln(A,' la so chan') else writeln(A, ' la so le');
if B mod 3 = 0 then writeln(B,' chia het cho 3') else writeln(B,' ko chia het cho 3');
if C mod 5 = 0 then writeln(C,' chia het cho 5') else writeln(C,' ko chia het cho 5');
if D mod 9 = 0 then writeln(D,'chia het cho 9') else write(D,' ko chia het cho 9');
end.
uses crt;
var a:array[2..1000000]of longint;
n,i,k,t,dem:longint;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until (1<n) and (n<=1000000);
for i:=2 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Nhap k='); readln(k);
t:=0;
dem:=0;
for i:=2 to n do
if a[i] mod k=0 then
begin
t:=t+a[i];
inc(dem);
end;
writeln('Tong cac so chia het cho ',k,' la: ',t);
writeln('So phan tu chia het cho ',k,' la: ',dem);
readln;
end.
a) 109 + 2 = 1000000000 + 2
= 100000002 chia hết cho 3 suy ra 1+0+0+0+0+0+0+0+0+2 = 3 chia hết cho 3.
Vậy 109 + 2 chia hết cho 3.
b) 1010 - 1 = 10000000000 - 1 = 9999999999 chia hết cho 9
Vậy 1010 - 1 chia hết cho 9.
Toán à?Hoài Phương Nguyễn Thị, bạn vô Toán mà hỏi sẽ có nhiều người trả lời đấy
a ) 972 + 200a = 972 + 2000 + a
= 2972 + a
Ta có : 2 + 9 + 7 + 2 + a = 20 + a
Để 972 + 200a chia hết cho 9 thì 20 + a chia hết cho 9
Mà a là chữ số => a = 7
Vậy với a bằng 7 ta được tổng 927 + 2007 chia hết cho 9
Câu b ) tương tự bạn tự làm nha