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.

13 tháng 3 2021

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

-> chuyển:

<biến đếm>:=0;

while (biến đếm) (giá trị cuối từ vòng lặp for...do) do

begin

< câu lệnh>;

<biến đếm>:=<biến đếm>+1;

end;

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

=>Chuyển thành: 

<biến đếm>:=0;

while (biến đếm) (giá trị cuối từ vòng lặp for...do) do

begin

< câu lệnh>;

<biến đếm>:=<biến đếm>+1;

end;

1: i=9; t=-8

2: i=7; s=16

3: i=10; s=55

4: T=-12; i=12

5: i=7; T=28

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;

15 tháng 5 2020

b)

Program HOC24;

var x,j: integer;

begin

x:=0;

for j:=1 to 6 do x:=x+j;

write(x);

readln

end.

15 tháng 5 2020

a)

Program HOC24;

var x,j: integer;

begin

j:=1; x:=0;

while j<=6 do

begin

x:=x+j;

j:=j+1;

end;

write(x);

readln

end.

13 tháng 9 2023

Để tạo tiêu đề đầu trang hoặc chân trang, ta thực hiện các bước sau:

B1. Trên dải lệnh Insert, nháy chuột vào lệnh Header hoặc Footer.

B2. Chọn một mẫu tiêu đề trong bảng các mẫu tiêu đề.

B3. Thực hiện chỉnh sửa nội dung cho tiêu đề.

Để chuyển về soạn thảo nội dung trong trang văn bản, ta nháy chuột vào lệnh Close Header and Footer.

loading...

17 tháng 3 2022

* Sử dụng For ... do

Var i,s:integer;

Begin

For i:=1 to 10 do

s:=s+i;

Write('Tong la ',s);

Readln;

End.

* Sử dụng While ... do

Var i,s:integer;

Begin

i:=1;

While i<=10 do

Begin

s:=s+i;

i:=i+1;

End;

Write('tong la ',s);

Readln;

End.

28 tháng 2 2023

Công thức : < giá trị cuối > - < giá trị đầu > + 1

Áp dụng : 7 - 2 + 1 = 6 ( lần lặp )