Bài 7. Câu lênh lặp
Xem thêm câu trả lời
Mô tả việc thực hiện câu lệnh lặp với số lần biết trước ?và xác định số vòng lặp?
Viết chương trình điểm kiểm tra cho môn toán của 35học sinh và in ra màn hình với số học sinh và điểm kiểm tra nhập từ bàn phím (sử dụng kiểu mảng)
uses crt;
var a:array[1..35]of real;
i,n:integer;
begin
clrscr;
n:=35;
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
for i:=1 to 35 do
writeln('Diem cua ban thu ',i,' la: ',a[i]:4:2);
readln;
end.
Đúng 0
Bình luận (0)
1.cho đoạn ct sau: Tong:30; while tong10 do tong:tong-2;khi kết thúc vòng lặp giá trị của biến tổng là ao nhiêu2. khai báo biến mảng: Var A:array[1..10] of real;sử dụng câu lệnh For i:1 to 5 do readln(a[i]); để gán giá trị cho các phần tử trong biến mảng A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?
Đọc tiếp
1.cho đoạn ct sau:
Tong:=30; while tong>10 do tong:=tong-2;
khi kết thúc vòng lặp giá trị của biến tổng là ao nhiêu
2. khai báo biến mảng: Var A:array[1..10] of real;
sử dụng câu lệnh For i:=1 to 5 do readln(a[i]); để gán giá trị cho các phần tử trong biến mảng A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?
Câu 2:
Ta sẽ nhập được 5 giá trị
Đúng 0
Bình luận (0)
1.cho đoạn chương trình sau: tong:2; while tong10 do tong:tong+1;sau khi thực hiện xong đoạn chương trình, biến tổng có giá trị bao nhiêu2. cho biết giá trị của X sau khi thực hiện xong đoạn ctX:1; Y:2, For i:1 to 4 do X:X+Y;3. giả sử A có 5 phần tử và giá trị các phần tử là 1,3,7,8,4 . khi thực hiện câu lệnh sau T:0; For i:1 to 5 do T:T+A[i]; giá trị của biến T là bao nhiêu?
Đọc tiếp
1.cho đoạn chương trình sau:
tong:=2; while tong<10 do tong:=tong+1;
sau khi thực hiện xong đoạn chương trình, biến tổng có giá trị bao nhiêu
2. cho biết giá trị của X sau khi thực hiện xong đoạn ct
X:=1; Y:=2, For i:=1 to 4 do X:=X+Y;
3. giả sử A có 5 phần tử và giá trị các phần tử là 1,3,7,8,4 . khi thực hiện câu lệnh sau T:=0; For i:=1 to 5 do T:=T+A[i]; giá trị của biến T là bao nhiêu?
Câu đầu ấy ạ-em hỏi mỗi câu ấy thôi ^_^
Ở dòng thứ 2 bạn thiếu dấu ; sửa lại: Thêm ; ở cuối dòng 2
ở dòng thứ 3 bạn sai dấu =; sửa lại: Thay dấu = thành dấu :
Ở dòng thứ 6 bạn sai chỗ i=; sửa lại: i:=
Ở dòng thứ 7 bạn sai chỗ i:=10; sửa lại: i<=10;
Ở dòng thứ 10 bạn sai chỗ i=i+2; sửa lại: i:=i+2;
Ở dòng thứ 11 bạn sai chỗ dấu end. Sửa lại: end;
Ở dòng thứ 12 bạn sai chỗ trong dấu (): Sửa lại: ('Tong la: ',tong);
Ở dòng cuối bạn sai chỗ dấu ; Sửa lại: end.
Đúng 0
Bình luận (0)
Viết c/trình Tính : S= 2/3 + 2/6 + 2/9 +...+2/36 Giải bằng câu lệnh while...do
Program HOC24;
var i,n: integer;
s: real;
begin
n:=3; s:=0;
while n<=36 do
begin
s:=s+2/n;
n:=n+3;
end;
write('S= ',S:1:2);
readln
end.
Đúng 0
Bình luận (0)
Viết chương trình cộng dồn số sách các lớp quyên góp cho đến khi tổng số sách lớn hơn hoặc bằng 100 thì dừng.
Mn giúp em ạ mai em thii rồi.
uses crt;
var n,t:integer;
begin
clrscr;
t:=0;
repeat
write('Nhap so sach:'); readln(n);
t:=t+n;
until t>=100;
writeln('Tong so quyen sach la: ',t);
readln;
end.
Đúng 1
Bình luận (0)
nêu cú pháp và hoạt động của câu lệnh lặp for...do ,số lần lặp
Cú pháp:
Dạng xuôi: For <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;
Đúng 0
Bình luận (0)
Dạng ngược: For <biến đếm>:=<giá trị cuối> downto <giá trị đầu> to <câu lệnh>;
Đúng 0
Bình luận (0)
Hoạt động:
Bước 1: Biến điều khiển nhận giá trị đầu.
Bước 2: Nếu giá trị biến điều khiển nhỏ hơn giá trị cuối thì chuyển đến bước 4.
Bước 3: {giá trị biến điều khiển bằng giá trị cuối} thực hiện câu lệnh, sau đó dừng lặp, chuyển tới câu lệnh tiếp theo vòng lặp.
Bước 4: Thực hiện câu lệnh sau do và tăng biến điều khiên tới giá trị tiếp theo.
Đúng 0
Bình luận (0)
Xem thêm câu trả lời
14.Câu lệnh lặp For biến đếm: giá trị đầu to giá trị cuối do câu lệnh; kết thúc khi:A. Khi biến đếm nhỏ hơn giá trị đầuB. Khi biến đếm nhỏ hơn giá trị cuốiC. Khi biến đếm lớn hơn giá trị đầuD. Khi biến đếm lớn hơn giá trị cuốigiúp mình với
Đọc tiếp
14.Câu lệnh lặp For <biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>; kết thúc khi:
A. Khi <biến đếm> nhỏ hơn <giá trị đầu>
B. Khi <biến đếm> nhỏ hơn <giá trị cuối>
C. Khi <biến đếm> lớn hơn <giá trị đầu>
D. Khi <biến đếm> lớn hơn <giá trị cuối>
giúp mình với
