K
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.

Câu 1:

-Đánh răng rửa mặt mỗi ngày

-Đi học

-Đi ngủ

Câu 2: 

a) Sai

Sửa lại: for i:=10 downto 1 do write('a');

b) Đúng

c) Đúng

Câu 3: 

Lặp n-1+1=n(lần)

Câu 4: 

S=15

Câu 5: 

uses crt;

var s,i:integer;

begin

clrscr;

s:=0;

for i:=1 to 10 do

  s:=s+i;

writeln('Tong cua 10 so tu nhien dau tien la: ',s);

readln;

end.

 

22 tháng 2 2021

mấy câu kia bạn làm được ko giúp giúp mình luôn ik

22 tháng 2 2021

a) sai:

sửa: for  i:=1 to 10 do write('a');

b) Đúng

c) Đúng

a) Sai

Sửa lại: for i:=10 downto 1 do write('a');

b) Đúng

c) Đúng

For <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;

a: Sai

Sửa lại: For i:=1 to 5 do writeln('A');

b: Sai

For i:=1 to 5 do writeln('A');

c: Sai 

x:=5;

while x>=5 do

x:=x+5;

d: var x:array[1..10]of integer;

Câu 1: Đoạn chương trình sau cho kết quả gì? For i:=1 to 10 do write(i,' ); A.12 3 4 5 6 7 89 10 B.Đưa ra 10 khoảng trắng C.Không có kết quả D.1098 7 6 5 4 3 2 1 Câu 2: Đoạn chương trình sau cho kết quả gì? For i:=5 to 10 do write('i'); A.iiiii B.5678910 C.i D.iii Câu 3: Đoạn chương trình sau cho kết quả gì? For i:=5 to 10 do If i mod 5 = 0 then write (i); Diiiii A.1 2 3 4 5 B.1 2 3 4 5 6 7 8 9 10 C.5 10 Câu 4: Đoạn chương trình sau cho kết quả...
Đọc tiếp

Câu 1: Đoạn chương trình sau cho kết quả gì? For i:=1 to 10 do write(i,' );
A.12 3 4 5 6 7 89 10
B.Đưa ra 10 khoảng trắng
C.Không có kết quả
D.1098 7 6 5 4 3 2 1
Câu 2: Đoạn chương trình sau cho kết quả gì? For i:=5 to 10 do write('i');
A.iiiii
B.5678910
C.i
D.iii
Câu 3: Đoạn chương trình sau cho kết quả gì?
For i:=5 to 10 do
If i mod 5 = 0 then write (i);
Diiiii
A.1 2 3 4 5
B.1 2 3 4 5 6 7 8 9 10
C.5 10
Câu 4: Đoạn chương trình sau cho kết quả gì?
S:=1; For i:=5 to 10 do if i mod 3 = 0 then S:=S * i; Write(S);
A.54
B.15
C.50
D.151200
Câu 5: Cho đoạn chương trình sau:
a:=3; b:=2;
If a>b then a:=4 else b:=1;
Sau khi thực hiện đoạn chương trình trên cho kết quả:
A.a=3
B.b=2
C.a=4
D.b=1
Câu 6: Đoạn chương trình sau cho kết quả gì?
S:=0;
For i:=1 to 9 do S:=S+i;
Write(s);
A.45
B.40
C.55
Câu 7: Cho x là biến thực đã được gán giá trị 13.56423. Để hiện lên màn hình nội dung “x=13.6"
cần chọn câu lệnh nào sau đây?
A.Writeln(x:5);
B.Writeln(x);
C.Writeln("x=",x:5:2);
D.Writeln('x=',x:2:1);
Câu 8: Trong NNLT Pascal phát biểu nào sau đây là đúng:
A.Có phân biệt chữ hoa chữ thường.
B.Sau mỗi câu lệnh đều phải có dấu chấm phẩy.
C.Trước lệnh Else bắt buộc phải có dấu chấm phẩy.
D.Lệnh Readln trước câu lệnh End. Không nhất thiết phải có dấu chấm phẩy.
Câu 9: Để thoát khỏi chương trình Pascal ta sử dụng tổ hợp phím nào?
A.Ctrl + Q
B.Ctrl + X
C.Alt + Q
D.Alt +X
Câu 10: Vòng lặp sau đây lặp lại mấy lần?
A:=2
For i:=0 to 7 do a:=a+1;
A.6
B.7
C.8

0

1:

a) Sai

b) Sai

c) đúng

d) sai

2:

câu lệnh lặp 6 lần

giá trị của s là 12

22 tháng 2 2020

Mình cảm ơn bạn nhiều nha vui

Mọi người giúp em với :< Câu 1: Để in ra màn hình các số nguyên từ 1 đến 10, câu lệnh nào dưới đây đúng? a. For i:=10 to 1 do write(i); b. For i:=1 to 10 do write('i':2); c. For i:=0 to 10 do write(i); d. For i:=1 to 10 do write(i:2); Câu 2: Cho biết số lần lặp của đoạn chương trình sau: For i:=-1 to 1 do write(i); a. 0 b. 1 c. 2 d. Không xác định Câu 3: Cho biết kết quả của đoạn chương trình sau: S:=0; for i:=1 to 100 do if (i...
Đọc tiếp

Mọi người giúp em với :<

Câu 1: Để in ra màn hình các số nguyên từ 1 đến 10, câu lệnh nào dưới đây đúng?

a. For i:=10 to 1 do write(i);

b. For i:=1 to 10 do write('i':2);

c. For i:=0 to 10 do write(i);

d. For i:=1 to 10 do write(i:2);

Câu 2: Cho biết số lần lặp của đoạn chương trình sau: For i:=-1 to 1 do write(i);

a. 0

b. 1

c. 2

d. Không xác định

Câu 3: Cho biết kết quả của đoạn chương trình sau: S:=0; for i:=1 to 100 do if (i mod 2=0) then write(i:2);

a. In ra màn hình các số nguyên từ 1 đến 100

b. In ra màn hình các số nguyên dương nhỏ hơn 100

c. In ra màn hình các số nguyên lẻ nhỏ hơn 100

d. In ra màn hình các số nguyên chẳn có giá trị nằm trong khoảng 2 đến 100

Câu 4: Sử dụng câu lệnh lặp để in ra màn hình tổng các số nguyên dương lẻ nhỏ hơn 100 (lưu ý: chỉ cần viết lệnh không cần viết thành chương trình hoàn chỉnh)

1

Câu 1: D

Câu 2: D

Câu 3: D

Câu 4:

t:=0;

for i:=1 to 100 do

if i mod 2=1 then t:=t+i;

writeln(t);

11 tháng 4 2020

câu cuối mình gửi lên cô cho sai bạn :<

a: Không vì giá trị đầu lớn hơn giá trị cuối

b: Không vì giá trị đầu và giá trị cuối là số thập phân

c: Không vì điều kiện trong while là phép gán

7 tháng 5 2019

câu lệnh trên lặp lại 10 lần