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.
3; 6; 9; 12; 15; 18; 21; 24; 27; 30; 33; 36; 39; 42; 45; ... ; 120; 123.
Số số hạng:
(123 - 3) : 3 + 1 = 41 số
Số hạng thứ 15 là 45 và 45 \(⋮\) 5
uses crt;
var a:array[1..15]of integer;
n:integer;
begin
clrscr;
n:=1;
a[1]:=3;
repeat
n:=n+2;
a[n]:=a[n-1]+3;
until a[n]>40;
for i:=1 to n-1 do
write(a[i]:4);
readln;
end.
uses crt;
var a:array[1..100]of integer;
i,n,t1,t2,t3:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
t1:=0;
t2:=0;
t3:=0;
for i:=1 to n do
begin
if a[i] mod 2=0 then t1:=t1+a[i]
else t2:=t2+a[i];
if (a[i] mod 2=0) and (a[i] mod 3=0) then t3:=t3+a[i];
end;
writeln(t1);
writeln(t2);
writeln(t3);
readln;
end.
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
#include <bits/stdc++.h>
using namespace std;
string n;
int d;
int main()
{
cin>>n;
d=n.length();
cout<<d;
return 0;
}
uses crt;
var a,b:longint;
Begin
clrscr;
Writeln('Nhap a,b=');
Readln(a,b);
writeln('tich hai so la : a*b=',a*b);
writeln('thuong hai so la :a/b=',a/b);
Readln;
End.