Em hãy viết vào vở cụ thể các bước của vòng lặp thứ 2, 3, 4 được mô tả trong hình 16.5.
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.
P/s: ở đây mình chỉ viết chương trình thôi, còn thuật toán bạn có thể suy ra từ chương trình nhé:
Câu 2:
uses crt;
var n,i:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
if n mod i=0 then write(i:4);
readln;
end.
Câu 3:
uses crt;
var n,i,dem:integer;
begin
clrscr;
write('Nhap n='); readln(n);
dem:=0;
for i:=1 to n do
if n mod i=0 then dem:=dem+1;
writeln('So uoc cua ',n,' la: ',dem);
readln;
end.
Câu 4:
uses crt;
var n,i,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
t:=0;
for i:=1 to n do
if n mod i=0 then t:=t+i;
writeln('Tong cac uoc cua ',n,' la: ',t);
readln;
end.
Câu 5:
uses crt;
var n,i:integer;
s:real;
begin
clrscr;
write('Nhap n='); readln(n);
s:=1;
for i:=1 to n do
if n mod i=0 then s:=s*i;
writeln('Tich cac uoc cua ',n,' la: ',s:4:2);
readln;
end.
Câu 6:
uses crt;
var n,i,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
t:=0;
for i:=1 to n do
if i mod 2=0 then t:=t+i;
writeln('Tong cac so chan trong khoang tu 1 den ',n,' la: ',t);
readln;
end.
Câu 8:
uses crt;
var n,i,kt:integer;
begin
clrscr;
write('Nhap n='); readln(n);
kt:=0;
for i:=2 to trunc(sqrt(n)) do
if n mod i=0 then kt:=1;
if (kt=0) and (n>1) then writeln(n,' la so nguyen to')
else writeln(n,' khong la so nguyen to');
readln;
end.
Các câu trả lời đúng là:
1) Có thể mô tả một kịch bản dưới dạng các bước tuần tự của một thuật toán. Đó là mô tả một thuật toán có các bước được thực hiện tuần tự.
3) Các bước của thuật toán được mô tả như thế nào thì các lệnh của bước đó cũng phải kế tiếp tuần tự như vậy.
Câu 2 bị sai vì khi thay đổi thứ tự các bước của thuật toán ta có thể thu được kịch bản khác
b)
uses crt;
var i,n:integer;
t:real;
begin
clrscr;
write('Nhap n='); readln(n);
i:=1;
t:=0;
while i<=n do
begin
t:=t+1/(i*(i+3));
i:=i+1;
end;
writeln(t:4:2);
readln;
end.
c) Các bước để tạo thư mục Hoc tap trong ổ đĩa D là:
- Bước 1: Chọn ổ đĩa D: (Là nơi chứa thư mục Hoc Tap).
- Bước 2: Nháy chuột phải vào vùng trống của cửa sổ, nháy chọn New, chọn Folder.
- Bước 3: Gõ tên thư mục (Hoc Tap), rồi nhấn Enter.
Bước 1: s=0; i←0;
Bước 2: i←i+1;
s←s+i;
Bước 3: Nếu i<=10 thì quay lại bước 2
Bước 4: Xuất s
Bước 5: Kết thúc
Cách bố trí dụng cụ thí nghiệm: Bình chứa dùng để hứng nước từ bình tràn. Các bước tiến hành thí nghiệm:
- Thả chìm vật rắn vào bình tràn, lấy phần nước tràn ra từ bình chứa
- Đổ nước từ bình chứa vào bình chia độ để đo thể tích nước đó, cũng chính là thể tích vật rắn
TK ạ