Những câu hỏi liên quan
Big City Boy
Xem chi tiết
Nguyễn Lê Phước Thịnh
18 tháng 12 2020 lúc 21:55

a) n mod 3=0;

b) m mod 7<>0;

c) y<=100;

d) (a+b>c) and (b+c>a) and (a+c>b);

e) ((a>0) and (b>0)) or ((a<0) and (b<0));

f) a/b=3/4;

g) ((a>5) and (b+c=10)) or ((a<=5) and (b+c=-20));

h) (m=1) or (m=3) or (m=5) or (m=7) or (m=8);

Bình luận (0)
moi moi dubai 2k4
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
17 tháng 10 2017 lúc 2:19

Đáp án đúng : D

Bình luận (0)
Sơn Trần
20 tháng 12 2021 lúc 16:59

Đáp án đúng : D

Bình luận (0)
Trần trung hiếu
Xem chi tiết
Nguyễn Lê Phước Thịnh
21 tháng 2 2021 lúc 13:48

P/s: ở đây mình chỉ viết chương trình thôi, còn thuật toán bạn có thể suy ra từ chương trình nhé:

Câu 2: 

uses crt;

var n,i:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  if n mod i=0 then write(i:4);

readln;

end.

Câu 3: 

uses crt;

var n,i,dem:integer;

begin

clrscr;

write('Nhap n='); readln(n);

dem:=0;

for i:=1 to n do 

  if n mod i=0 then dem:=dem+1;

writeln('So uoc cua ',n,' la: ',dem);

readln;

end.

Câu 4: 

uses crt;

var n,i,t:integer;

begin

clrscr;

write('Nhap n='); readln(n);

t:=0;

for i:=1 to n do 

  if n mod i=0 then t:=t+i;

writeln('Tong cac uoc cua ',n,' la: ',t);

readln;

end.

Câu 5: 

uses crt;

var n,i:integer;

s:real;

begin

clrscr;

write('Nhap n='); readln(n);

s:=1;

for i:=1 to n do 

  if n mod i=0 then s:=s*i;

writeln('Tich cac uoc cua ',n,' la: ',s:4:2);

readln;

end.

Câu 6: 

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 2=0 then t:=t+i;

writeln('Tong cac so chan trong khoang tu 1 den ',n,' la: ',t);

readln;

end.

Câu 8: 

uses crt;

var n,i,kt:integer;

begin

clrscr;

write('Nhap n='); readln(n);

kt:=0;

for i:=2 to trunc(sqrt(n)) do 

  if n mod i=0 then kt:=1;

if (kt=0) and (n>1) then writeln(n,' la so nguyen to')

else writeln(n,' khong la so nguyen to');

readln;

end.

Bình luận (0)
Hằng Vu
Xem chi tiết
Nguyễn Lê Phước Thịnh
26 tháng 2 2022 lúc 14:50

Chọn A

Bình luận (0)
vvd fan
Xem chi tiết
Nguyễn Lê Phước Thịnh
14 tháng 4 2020 lúc 17:02

a) x mod 4=0

b) y mod 5<>0

c) (a+b>c) and (a+c>b) and (b+c>a)

Bình luận (0)
Không Tồn Tại Youtuber
Xem chi tiết
Nguyễn Lê Phước Thịnh
30 tháng 12 2021 lúc 23:25

Chọn B

Bình luận (0)
Như Quỳnh
Xem chi tiết
Nguyễn Hà Giang
17 tháng 11 2021 lúc 12:58

Câu 1: A;B;C

Câu 2:A; C

Câu 3:A;B

Câu 4:C

Bình luận (4)
lê thị bích ngọc
18 tháng 11 2021 lúc 11:48

Mình tưởng chương trình mới là học c++ rồi chứ

 

Bình luận (0)
Trâm Vương
Xem chi tiết
Nguyễn Lê Phước Thịnh
22 tháng 2 2022 lúc 21:36

uses crt;

var k,x,y:integer;

begin

clrscr;

readln(k);

x:=k mod 5;

y:=k div 5;

writeln(k,'/5=',x,' du ',y);

readln;

end.

Bình luận (1)