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.

7 tháng 5 2020

tính số vòng lặp i . còn tổng s không qá 100

\n
8 tháng 5 2020

tổng s được tính như thế nào ?

mn ới, ét o ét nèo ;-;Câu 8: Pascal sử dụng câu lệnh nào sau đây để lặp với số lần lặp biết trước?A. if...then            B. if...then...else               C. for...to…do           D. while...do Câu 9. Trong Câu lệnh lặp: For i := 1 to 15 do s:= s + 2*i. Khi kết thúc Câu lệnh lặp trên, Câu lệnh tính s được thực hiện bao nhiêu lần?A. 10 lần ;                           B. 15 lần;                                             C. 20...
Đọc tiếp

mn ới, ét o ét nèo ;-;
Câu 8: Pascal sử dụng câu lệnh nào sau đây để lặp với số lần lặp biết trước?

A. if...then            B. if...then...else               C. for...to…do           D. while...do
 

Câu 9. Trong Câu lệnh lặp: For i := 1 to 15 do s:= s + 2*i. Khi kết thúc Câu lệnh lặp trên, Câu lệnh tính s được thực hiện bao nhiêu lần?

A. 10 lần ;                           B. 15 lần;                                             C. 20 lần;                             D. Không thực hiện.

Câu 10 : Trong câu lệnh lặp    for i :=1 to 20 do begin s:= s+i; end ;

câu lệnh gán được thực hiện bao nhiêu lần?

a) Không lần nào.                       b) 1 lần                       c) 2 lần                       d) 20 lần

Câu 11 : Trong câu lệnh lặp: For <Biến đếm>:=<Giá trị đầu> to <Giá trị cuối> do <câu lệnh>; Khi thực hiện ban đầu Biến đếm nhận giá trị = Giá trị đầu, sau mỗi vòng lặp biến đếm tăng thêm:

A. 1 đơn vị                 B. 2 đơn vị                 C. 3 đơn vị                 D. 4 đơn vị
 

Câu12: Khi nào thì câu lệnh lặp For…do (dạng tiến) kết thúc?

A. Khi biến đếm nhỏ hơn giá trị cuối.                B. Khi biến đếm bằng giá trị đầu.

C. Khi biến đếm bằng giá trị cuối.                      D. Khi biến đếm lớn hơn giá trị cuối.

Muốn sà vào lòng soái ca khóc 1 trận - Baozou Manhua meme - Meme Gấu trúc Trung Quốc | Meme Dump | Lục Lọi Meme | Cộng đồng meme trực tuyến

 

4
10 tháng 3 2022

tách ra thì mọi ng mới có động lực

10 tháng 3 2022

ét ô ét tiếp à

ét o ét đê ;-;Câu 8: Pascal sử dụng câu lệnh nào sau đây để lặp với số lần lặp biết trước?A. if...then            B. if...then...else               C. for...to…do           D. while...do Câu 9. Trong Câu lệnh lặp: For i := 1 to 15 do s:= s + 2*i. Khi kết thúc Câu lệnh lặp trên, Câu lệnh tính s được thực hiện bao nhiêu lần?A. 10 lần ;                           B. 15 lần;                                             C. 20 lần;            ...
Đọc tiếp

ét o ét đê ;-;
Câu 8:
Pascal sử dụng câu lệnh nào sau đây để lặp với số lần lặp biết trước?

A. if...then            B. if...then...else               C. for...to…do           D. while...do
 

Câu 9. Trong Câu lệnh lặp: For i := 1 to 15 do s:= s + 2*i. Khi kết thúc Câu lệnh lặp trên, Câu lệnh tính s được thực hiện bao nhiêu lần?

A. 10 lần ;                           B. 15 lần;                                             C. 20 lần;                             D. Không thực hiện.

Câu 10 : Trong câu lệnh lặp    for i :=1 to 20 do begin s:= s+i; end ;

câu lệnh gán được thực hiện bao nhiêu lần?

a) Không lần nào.                       b) 1 lần                       c) 2 lần                       d) 20 lần

Câu 11 : Trong câu lệnh lặp: For <Biến đếm>:=<Giá trị đầu> to <Giá trị cuối> do <câu lệnh>; Khi thực hiện ban đầu Biến đếm nhận giá trị = Giá trị đầu, sau mỗi vòng lặp biến đếm tăng thêm:

A. 1 đơn vị                 B. 2 đơn vị                 C. 3 đơn vị                 D. 4 đơn vị
 

Câu12: Khi nào thì câu lệnh lặp For…do (dạng tiến) kết thúc?

A. Khi biến đếm nhỏ hơn giá trị cuối.                B. Khi biến đếm bằng giá trị đầu.

C. Khi biến đếm bằng giá trị cuối.                      D. Khi biến đếm lớn hơn giá trị cuối.
Muốn sà vào lòng soái ca khóc 1 trận - Baozou Manhua meme - Meme Gấu trúc Trung Quốc | Meme Dump | Lục Lọi Meme | Cộng đồng meme trực tuyến

3
10 tháng 3 2022

sao ko ai ngó ngàng gì đến tui hết zậy ;-;

10 tháng 3 2022

hiha

28 tháng 4 2023

Uses crt;

var i,t: integer;

begin clrscr;

i:=0;

while(i<=120) do begin

i:=i+1;

t:=t+i;

end;

write(t);

readln;

end.

1 tháng 4 2022

Program HOC24;

var i,n: integer;

S: real;

begin

write('Nhap N: '); readln(n);

s:=0;

for i:=1 to N do s:=s+1/i;

write('S= ',s:5:2);

readln

end.

6 tháng 3 2023

Program HOC24;

uses crt;

var i,n: integer;

s: real;

begin

clrscr;

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

s:=0;

for i:=1 to n do s:=s+1/(i*(i+1));

write('S= ',s:6:2);

readln

end.

7 tháng 3 2023

Còn lệnh while...do mình làm như thế nào ạ?

uses crt;

var i,n,t:integer;

begin

clrscr;

readln(n);

t:=0; i:=1; 

while (i<=n) do 

  begin

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

i:=i+1;

end;

writeln(t);

readln;

end.

Tham khảo:

Uses crt;

Var   S, i: integer;

Begin

        clrscr;

        S : = 0;

        i := 1;

        while i <= 10 do

        begin

                S := S + i;

                i := i + 1;

        end;

        writeln (S);

        readln;

end.