1,viết chương trình kiểm tra xem số a có phải là số chia hết cho 3 những lại không chia hết cho 0 2,hãy mô tả...

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.

Mua vip

cuong phamquoc

25 tháng 12 2018

1,viết chương trình kiểm tra xem số a có phải là số chia hết cho 3 những lại không chia hết cho 0

2,hãy mô tả thuật toán về phương trình bậc nhất một ẩn

3,cho biết kết quả của đoạn chương trình sau:

a.x:=5,y:=5;

if (36 mod 9)=0 and (36 mod 9)=4 then x:=x+1 else y:=y+1;

write(x', ,'y);

b.x:=4;y:=5

if y:=x+1 then y:=x;

x:=2

#Tin học lớp 8

Các câu hỏi dưới đây có thể giống với câu hỏi trên

Nguyễn Thị Mỹ Nữ

21 tháng 12 2018

1,viết chương trình kiểm tra xem số a có phải là số chia hết cho 3 những lại không chia hết cho 0 2,hãy mô tả thuật toán về phương trình bậc nhất một ẩn 3,cho biết kết quả của đoạn chương trình sau: a.x:=5,y:=5; if (36 mod 9)=0 and (36 mod 9)=4 then x:=x+1 else y:=y+1; write(x', ,'y); b.x:=4;y:=5 if y:=x+1 then y:=x; x:=2 giúp mik với mai thi hk r ...

Đọc tiếp

#Tin học lớp 8

Nguyễn Thị Mỹ Nữ

21 tháng 12 2018

hk chia hết cho 9 nna

Đúng(0)

Thaotran Accmoicua

15 tháng 12 2020

Cho đoạn chương trình, tìm lỗi sai sửa lại cho đúng: 1) program : bai1; var x,y:= interger; x=7; n=2.68; begin writeln(nhap so x); realn(x); writeln(nhap so y); realn(y); if x mod 2 = 0 then y=y x ; else y:=y n; write (‘ket qua phep tinh la’ , y); r...

#Tin học lớp 8

hacker

16 tháng 12 2020

program bai1;

uses crt;

var x,y,n:integer;

begin

clrscr;

x:=7;

n:=2.68;

write('nhap so x:'); readln(x);

write('nhap so y:');readln(y);

if x mod 2 =0 then y:=y*x

else y:=y*n;

write('ket qua phep tinh la:', y);

readln

end.

Đúng(1)

hacker

16 tháng 12 2020

program bai1;

uses crt;

var x,y,n:integer;

begin

clrscr;

x:=7;

n:=2.68;

write('nhap so x:'); readln(x);

write('nhap so y:');readln(y);

if x mod 2 =0 then y:=y*x

else y:=y*n;

write('ket qua phep tinh la:', y);

readln

end.

Đúng(1)

Lụctungthùngrác Tìmxácngườiyêu

13 tháng 12 2017

Cho biết kết quá các câu lệnh sau:

a) Biết a có giá trị là 10.

If (a mod 2 = 0) then write(a, 'chia het cho 2') else wite('khong thoa man');

b) Biết x có giá trị là 5, y có giá trị là 7

If (x >= 5) and (y >7) then x := x+2 else y := y+3

Giúp vss mai ktra học kì rồiiiii

#Tin học lớp 8

Anh Pha

13 tháng 12 2017

a,Kết quả : 10 chia het cho 2

b,Kết quả : y:=10

Chúc bạn thi tốt ^^

Đúng(0)

Lụctungthùngrác Tìmxácngườiyêu

13 tháng 12 2017

cảm ơn bạn nhiều ~~

Đúng(0)

Hương Nguyễn

5 tháng 6 2020

1, Cho s và i là biến nguyên. Khi chạy đoạn chương trình: s:=0;for i:=1 to 3 do s := s+3*i; s:=s+5;writeln(s); Kết quả in lên màn hình là? * A.12 B. 10 C.23 D. 26 2, Kêt quả của câu lệnh For i:=1 to 20 do if i mod 3=2 then write(i:3); * A.In ra các số lẻ từ 1 đến 20; B. In ra các số chẵn từ 1 đến 20; C. In ra các số chia hết cho 3 từ 1 đến 20; D. In ra các số chia hết cho 3 dư 2 từ 1 đến...

Đọc tiếp

1, Cho s và i là biến nguyên. Khi chạy đoạn chương trình: s:=0;for i:=1 to 3 do s := s+3*i; s:=s+5;writeln(s); Kết quả in lên màn hình là? * A.12 B. 10 C.23 D. 26

2, Kêt quả của câu lệnh For i:=1 to 20 do if i mod 3=2 then write(i:3); *

A.In ra các số lẻ từ 1 đến 20; B. In ra các số chẵn từ 1 đến 20; C. In ra các số chia hết cho 3 từ 1 đến 20; D. In ra các số chia hết cho 3 dư 2 từ 1 đến 20;

3, Trong câu lệnh lặp For i:=3 to 15 do s:=s+i; Có bao nhiêu vòng lặp? *

A. 15; B. 12; C. 13 D. 3;

4, Cho k,m,n nhận giá trị tương ứng 4,5,6; kết thúc câu lệnh sau:X:=n; If ((x mod 2=0)) or (x<=5) then x:=m*k else x:=m div k; thì x có giá trị là ? *

A. 1 B. 0 C. 5. D. 20 5, Cho biết đoạn chương trình Pascal sau đây chương trình thực hiện bao nhiêu vòng lặp?s:=0; n:=0; while s<=5 do n:= n+1;s:= s+n; * A. 3 B. 6 C. 10 D. kết quả khác 6, Cho a,b,c lần lượt nhận giá trị 10,30,20 . Hỏi sau đoạn chương trình Begin X:=a; If x>a then x:=a; if x>b then x:=b;if x>c then x:=c;end; x có giá trị là? * A. 20 B. 10 C. 30 D. Cả ba đáp án đều sai. 7, Cho x:=7; kết thúc câu lệnh If ((x mod 3=0)) and (x<=8) then x:=x+10; thì x có giá trị là ? * A. 8 B. 10 C. 17 D. 7 8, Cho s và i là biến nguyên. Khi chạy đoạn chương trình s := 1; for i:=1 to 5 do s := s+i; Kết quả in lên màn hình là của s là ? * A. 15 B. 16 C. 11 D. 22 9, Cho biết đoạn chương trình Pascal sau đây, khi kết thúc giá trị của S bằng bao nhiêu? S:=0; n:=0;while S<=3 do begin n:= n+1;S:= s+n; end; * A. 15 B. 10 C. 6 D. 3

#Tin học lớp 8

Kiều Vũ Linh

10 tháng 12 2020

1. C

2. D

3. C

4. D

5. D

6. B

7. D

8. B

9. C

Đúng(0)

Sinh Tran

26 tháng 2 2022

Sai

Đúng(1)

Nguyễn Quỳnh Trang

1 tháng 1 2018

Sau mỗi câu lệnh dưới đây, giá trị của biến X sẽ là bao nhiêu nếu trước đó giá trị của X=10

a) if X mod 3=2 then X:=X+1;

b) if (X mod 3=0) or (X>=10) then X:=2*X;

c) if (X mod 4=2) and (X>5) then X:=0;

d) if X mod 5=0 then begin X:=X*X;

X:=X-10, end;

#Tin học lớp 8

Tú Nguyễn

1 tháng 1 2018

thay X==10 vô ròi phân tích mik ko rảnh nha

Đúng(0)

Nguyễn Quỳnh Trang

1 tháng 1 2018

Sau mỗi câu lệnh dưới đây, giá trị của biến X sẽ là bao nhiêu nếu trước đó giá trị của X=10

a) if X mod 3=2 then X:=X+1;

b) if (X mod 3=0) or (X>=10) then X:=2*X;

c) if (X mod 4=2) and (X>5) then X:=0;

d) if X mod 5=0 then begin X:=X*X;

X:=X-10, end;

#Tin học lớp 8

Đặng Nam Anh

25 tháng 4 2019

Hãy cho biết ket qua cua cac đoạn chương trình sau

x:=1;y:=2;z:=3;

for i:=1 to 5 do

if i mod 2=0 then

begin x:=x+2 ; y:=y+2 ; z:= z+y+x; end;

writeln(x,','y,','z);

giải dùm mình lẹ lẹ nha

#Tin học lớp 8

Minh Lệ

25 tháng 4 2019

Lời giải :

Ban đầu x:=1 ; y:=2 ; z:=3 ta có :

x:=x+2 <=> x:=1+2=3

y:=y+2 <=> y:=2+2=4

z:=z+y+x <=> z:=3+4+3=10

Vậy kết quả in ra màn hình sau đoạn lệnh là : 3,4,10

Đúng(0)

Minh Lệ

25 tháng 4 2019

Lời giải :

Ban đầu x:=1;y:=2,z:=3 trong chương trình con ta có

x:=x+2 <=> x:=1+2=3

y:=y+2 <=> y:=2+2=4

z:=z+y+x <=> z:=3+4+3=10

Vậy kết quả in ra màn hình là 3,4,10

Đúng(0)

Diệp Đoàn Văn

13 tháng 2 2020

LÝ THUYẾT: 1) Năm nay là 2020 vậy tháng 2 có điều kiện THANG2 > 0 và điều kiện nào sao đây: A. THANG2 <= 28 B. THANG2 <= 29 C. THANG2 <= 31 D. THANG2 <= 30 2) Để thể hiện điều kiện D lớn hơn hay 8 E là Gioi câu nào sau đây đúng A. (D >= 8) OR (E = ' Gioi ') B. ( D >= 8) OR (E= ''Gioi'') C. (D >= 8) OR (E = Gioi) D. D .= 8 OR E = Gioi 3) Để tìm giá trị lớn nhất của 2 số a,b thì ta viết: A. Max:=b;If a> Max then...

Đọc tiếp

LÝ THUYẾT:

1) Năm nay là 2020 vậy tháng 2 có điều kiện THANG2 > 0 và điều kiện nào sao đây:

A. THANG2 <= 28 B. THANG2 <= 29 C. THANG2 <= 31 D. THANG2 <= 30

2) Để thể hiện điều kiện D lớn hơn hay 8 E là Gioi câu nào sau đây đúng

A. (D >= 8) OR (E = ' Gioi ') B. ( D >= 8) OR (E= ''Gioi'')

C. (D >= 8) OR (E = Gioi) D. D .= 8 OR E = Gioi

3) Để tìm giá trị lớn nhất của 2 số a,b thì ta viết:

A. Max:=b;If a> Max then Max:=a; B. If (a>b) then Max:=a;If (b>a) then Max:=b;

C. Max:=a;If b>Max then Max:=b; D. Cả 3 câu đều đúng

4) Lệnh nào thể hiện A là số chẵn:

A. If A mod 2 <> 1 then write (' A là số lẻ ');

B. If A mod 2 <> 0 then write (' A là số chẵn ');

C. If A mod 2 = 0 then write (' A là số chẵn ');

D. If A mod 2 = 1 then write (' A là số chẵn ');

5) Chương trình sau cho biết kết quả là gì?

Var a, b: real; x integer; Begin readln(a, b); If a > b then x:=a else x:=b; Write(x); End.

A. Đảo giá trị của 2 biến a, b cho nhau

B. Chương trình không thực hiện được do lỗi khai báo kiểu dữ liệu

C. Xuất ra màn hình số lớn trong 2 số a, b đã nhập

D. Xuất ra màn hình số nhỏ trong 2 số a, b đã nhập

6) Điều kiện nào hợp lệ trong các điều kiện sau khi nói về ngày trong tháng 8:

A. (NGAY > 0) AND (NGAY <= 31) B. (NGAY > 0) AND (NGAY <= 30)

C. NGAY <= 31 D. NGAY > 0

7) Để thể hiện điều kiện D lớn hơn hay bằng 8 và E là Gioi câu nào sau đây đúng:

A. D >= 8 AND E= Gioi B. (D >= 8) AND (E= Gioi)

C. (D >= 8) AND (E= "Gioi") D. (D >= 8) AND (E= 'Gioi')

8) Xác định học sinh thi đậu hay rớt bằng câu lệnh nào sau đây:

A. If ĐTB >= 0 then Writeln('Thi đậu');

B. If ĐTB >= 0 then Writeln('Thi rớt');

C. If ĐTB >= 5 then Writeln('Thi đậu') else Writeln('Thi rớt');

D. If X mod 2=0 then Writeln('Thi rớt') else Writeln('Thi đậu');

9) Tìm số bé nhất trong 3 số x, y, z bằng câu lệnh nào sau đây:

A. min:=x; If y>min then min:=y else min:=z;

B. min:=x; If y>min then min:=y; if z>min then min:=z;

C. min:=x; If y<min then min:=y else min:=z;

D. min:=x; If y<min then min:=y; if z<min then min:=z;

10) Để thể hiện B lớn hơn 10 câu nào sau đây đúng:

A. B >= '10' B. B>= '10' C. B > 10 D. B >= 10

#Tin học lớp 8

Nguyễn Lê Phước Thịnh

13 tháng 2 2020

Câu 1: B

Câu 2: A

Câu 3: D

Câu 4: C

Câu 5: B

Câu 6: A

Câu 7: D

Câu 8: C

Câu 9: D

Câu 10: C

Đúng(0)

Linh Tuệ

8 tháng 12 2019

Câu 1: Sau mỗi câu lệnh dưới đây, giá trị của biến X là bao nhiêu, nếu trước đó giá trị của X bằng 7?

a) if (X mod 2 = 1) then X := X+1;

b) if X > 10 then X := X+1;

c) if (X div 3 = 2) then X := X+1;

d) if (45 mod 3 =0) then X := X*X;

Câu 9: Hãy giải thích ý nghĩa của các câu lện sau:

a) Y := 5;

b) X := X+1;

c) A := B;

d) Y := Y+5;

#Tin học lớp 8

Linh Tuệ

8 tháng 12 2019

Làm giúp em với ạ! Em cảm ơn

Đúng(0)

Nguyễn Chơn Nhân

8 tháng 12 2019

câu 1 :

a, x=8;

b,x=7;

c,X=8;

d,x=49;

câu 9:
a, gán Y bởi 5 (lúc này Y sẽ bằng 5).

b,gán x bởi x+1.

c,gán a bởi b.

d,gán y bởi y+5.

Đúng(0)

Chúng tôi đề xuất

Tài nguyên

Ứng dụng mobile

Bảng xếp hạng

Các khóa học có thể bạn quan tâm

Yêu cầu VIP