a. Vt chương trình =nnlt pascal Mô tả thuật toán sau Bước 1. S←1;n←0 Bước 2. Nếu s>=10;chuyển bước 4 Bước 3. N←n+2,s←s+n; quay bước 2 Bước 4 thông báo s và KT thuật toán b. khởi động phần mềm Free pascal soạn thảo lưu dịch chạy trương trình quan sát kết quả
Những câu hỏi liên quan
Giúp Tui với ạ(đang cần gấp)!!!! Cho mô tả thuật toán sau: Bước 1. S<--0;n<--0; bước2. Nếu n>4 thì chuyển đến bước 4. Bước3. N<--n+1;S<--S+n;quay lại bước2. Bước 4.thông báo gtri S. a)tính gtri S,n. b) vt chương trình (sử dụng vòng lặp For...to...do)
a: n=10
b: uses crt;
var i,s,n:integer;
begin
clrscr;
s:=0;
for i:=1 to 4 do s:=s+i;
write(s);
readln;
end.
Đúng 0
Bình luận (0)
Giả sử cần viết chương trình nhập vào hai số nguyên, in ra màn hình số lớn hơn.a). Hãy mô tả các bước của thuật toán để giải quyết bài toán trên. b). Viết chương trình Pascal để thực hiện thuật toán đó.
Đọc tiếp
Giả sử cần viết chương trình nhập vào hai số nguyên, in ra màn hình số lớn hơn.
a). Hãy mô tả các bước của thuật toán để giải quyết bài toán trên.
b). Viết chương trình Pascal để thực hiện thuật toán đó.
Thứ tự các bước giải bài toán trên máy tính: *
A. Mô tả thuật toán → Xác định bài toán → Viết chương trình
B.Xác định bài toán → Mô tả thuật toán → Viết chương trình
C.Viết chương trình → Xác định bài toán → Mô tả thuật toán
D.Xác định bài toán → Viết chương trình → Mô tả thuật toán
Xem thêm câu trả lời
a/. Em hãy cho biết thuật toán máy tính sẽ thực hiện bao nhiêu vòng lặp? Kết thúc giá trị của S bằng bao nhiêu?
b/. Viết chương trình bằng Pascal để mô tả thuật toán đó.
B1: S ! 20, n! 1;
B2: Nếu S ≥ 5, chuyển B4.
B3: n ! N + 1, S ! S - n và quay lại B2.
B4: Thông báo S và kết thúc thuật toán.
a: Thuật toán sẽ thực hiện 5 vòng lặp
Kết thúc thì S=0
b: uses crt;
var i,s,n:integer;
begin
clrscr;
s:=20;
n:=1;
while (s>=5) do
begin
n:=n+1;
s:=s-n;
end;
writeln(s);
readln;
end.
Đúng 1
Bình luận (0)
A. Em hãy cho biết thuật toán máy tính sẽ thực hiện bao nhiêu vòng lặp? Kết thúc giá trị của S bằng bao nhiêu? B. Viết chương trình bằng pascal để mô tả thuật toán đó. B1: S ! 20, n! 1; B2: nếu S>5 hoặc = 5, chuyển b4 B3: n ! N + 1, S ! S - n và quay lại b2 B4: thông báo S và kết thúc thuật toán.
uses crt;
var s,n:integer;
begin
clrscr;
s:=20;
n:=1;
while s>=5 do
begin
n:=n+1;
s:=s-n;
end;
writeln(s);
readln;
end.
Đúng 1
Bình luận (0)
a/. Em hãy cho biết thuật toán máy tính sẽ thực hiện bao nhiêu vòng lặp? Kết thúc giá trị của S bằng bao nhiêu? b/. Viết chương trình bằng Pascal để mô tả thuật toán đó. B1: S ← 20, n←1; B2: Nếu S ≥ 5, chuyển B4. B3: n ←N + 1, S ← S - n và quay lại B2. B4: Thông báo S và kết thúc thuật toán.
Thuật toán sẽ chạy 5 vòng lặp
Kết thúc thì S=0
Đúng 0
Bình luận (0)
Hãy cho biết thuật toán máy tính sẽ thực hiện bao nhiêu vòng lặp ? Kết thúc giá trị của S bằng bao nhiêu ? Viết chương trình bằng Pascal để mô tả thuật toán đó B1 : S
Một oto đi từ A đến B với vận tốc trung bình v(km/h)hết t(h).Tính quãng đường AB(biết v,t nhập từ bàn phím) 1. Xác định bài toán: +input +output 2.mô tả thuật toán(liệt kê các bước thực hiện) 3.sử dụng ngôn ngữ lập trình free pascal viết chương trình bài toán trên
Em hãy cho biết thuật toán máy tính sẽ thực hiện bao nhiêu vòng lặp? Kết thúc giá trị của S bằng bao nhiêu? Viết chương trình bằng Pascal để mô tả thuật toán đó.
B1: S ! 20, n! 1;
B2: Nếu S ≥ 5, chuyển B4.
B3: n ! N + 1, S ! S - n và quay lại B2.
B4: Thông báo S và kết thúc thuật toán.
Giúp mình với ;-;