Cho hỏi: if (n mod i)=0 then write(i)

TT

Thanh Thanh

6 tháng 4 2020

Cho hỏi: if (n mod i)=0 then write(i);

nghĩa là sao ?

#Tin học lớp 8

1

NL

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

6 tháng 4 2020

có nghĩa là nếu n chia hết cho i thì viết i ra màn hình

Đúng(0)

LH

lê hà linh

15 tháng 4 2020

n:=10; s:=0; for i:=1 to n do if n mod i=0 then s:=s+i; Write(s); Hỏi s=? * a:=123; b:=456; IF a>b THEN a:=a-b ELSE b:=b+a; Write('a=',a,'b=',b); Hỏi a=? b=? n:=12345; if n mod 2 = 0 then write(' Y') else write('N'); hỏi kết quả trên màn hình là gì?

#Tin học lớp 8

0

NC

Nguyễn Cảnh Hùng

12 tháng 7 2018

Cho biết kết quả của đoạn chương trình sau?

N:=5; Tong:=0;

For i:=1 to n do

If (i mod 3=0) then Tong:=Tong + i;

Write(Tong);

A. 3

B. 1

C. 6

D. 2

#Tin học lớp 11

2

DN

Đỗ Ngọc Trinh

12 tháng 7 2018

Đáp án đúng : A

Đúng(0)

HL

Hân Lê ngọc

17 tháng 5 2021

A

Đúng(0)

NC

Nguyễn Cảnh Hùng

10 tháng 2 2019

Cho biết kết quả của đoạn chương trình sau?

N:=5; Tong:=0;

For i:=1 to n do

If (i mod 2=0) then Tong:=Tong + i;

Write(Tong);

A. 3

B. 1

C. 6

D. 2

#Tin học lớp 11

1

DN

Đỗ Ngọc Trinh

10 tháng 2 2019

Đáp án đúng : C

Đúng(0)

NC

Nguyễn Cảnh Hùng

11 tháng 10 2019

Cho biết kết quả của đoạn chương trình sau?

N:=5; Tong:=0;

For i:=1 to n do

If (i mod 3=0) then Tong:=Tong + 1;

Write(Tong);

A. 3

B. 1

C. 6

D. 2

#Tin học lớp 11

1

DN

Đỗ Ngọc Trinh

11 tháng 10 2019

Đáp án đúng : B

Đúng(0)

NC

Nguyễn Cảnh Hùng

1 tháng 12 2018

Cho biết kết quả của đoạn chương trình sau?

N:=5; Tong:=0;

For i:=1 to n do

If (i mod 2=0) then Tong:=Tong + 1;

Write(Tong);

A. 3

B. 1

C. 6

D. 2

#Tin học lớp 11

1

DN

Đỗ Ngọc Trinh

1 tháng 12 2018

Đáp án đúng : D

Đúng(0)

NC

Nhân CFM

11 tháng 5 2020

Program HelloWorld(output); Var a,b :array[1..100] of integer; i,n,s,d:integer; begin write(‘Nhap n= ’); readln(n); For i:=1 to n do Begin Write(‘a[‘,i,’]=’); readln(a[i]); End; s:=0; for i:=1 to n do if (a[i]mod 2=1) then s:=s+a[i]; write(‘tong so le ’,s); d:=0; for i:=1 to n do if (a[i]mod 3=0) then d:=d+1; write(‘so luong so chia het cho 3: ’,d); For i:=1 to n do b[i]:=2*a[i]; For i:=1 to n do write(b[i]:4); readln end. code này sai chỗ nào vậy mn ?, giúp em sửa với...

Đọc tiếp

#Tin học lớp 11

1

ML

Minh Lệ

11 tháng 5 2020

Mình kiểm tra thấy nó có sai về lỗi gì đâu. Ý bạn là sai về cách chạy đúng không, bạn gửi đề để mình xem nhé

Đúng(0)

TL

Thảo Lam Nguyễn

24 tháng 3 2022

để tính tổng s=2+4+6 ... +n;

em chọn lệnh:

a) for i:=1 to n do if (i mod 2)=0 then s:=s+1;

b) for i:=1 to n do if (i mod 2) <> 2 then s:=s+1;

c) for i:=1 to n do s:=s+1;

d) for i:=1 to n do if (i mod 2) = 1 then s:=s+1;

mn giúp em với ạ, cảm ơn mn nhiều

#Tin học lớp 8

0

TH

Thiên Hoàng Ân

5 tháng 4 2020

1. For I = 2 to 12 Do write ('O'), câu lệnh in ra bao nhiêu chữ O? 2. For I = 1 to 20 Do If (...) Then write (I,''); chỗ trống cần điền để liệt kê ra các SỐ LẺ từ 1 đến 20 là? 3. để tính tổng 1 + 2 + ... + 100 ta thực hiện For I = 1 to 100 Do S:=...... ... cần điền? 4. S;=0; For I:=4 to 12 Do If (I mod 12=1) Then S:=S +I; giá trị của S? 5. S;=0; For I:=1 to 5 Do S:=S +I; giá trị của S? 6. For I = 1 to 10 Do If (I mod 3 = 0) Then...

Đọc tiếp

#Tin học lớp 8

1

ML

Minh Lệ

5 tháng 4 2020

1) 11

2) I mod 2=1

3) S+i;

4) 0

5) 15

6) 3 6 9

7) 0

8) for i:=1 to 20 do write('C');

Đúng(0)

NC

Nguyễn Cảnh Hùng

10 tháng 6 2019

Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình:i:=1;While i <5 do Begin if I mod 2 = 0 then Write(‘TIN HOC’); i:=i+1;End;Chữ TIN HOC được in ra màn hình mấy lần A. 3 B. 2 C. 1 D....

Đọc tiếp

#Tin học lớp 11

1

DN

Đỗ Ngọc Trinh

10 tháng 6 2019

Đáp án đúng : B

Đú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