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.

12 tháng 11 2019

Bước 1: Gán giá trị cho 2 và biến SUM= 0 và i=0.

Bước 2: Do i=0<100 nên chuyển tới bước 3. Nếu i>100 thì chuyển tới bước 4.

Bước 3:Tăng giá trị i thêm 1 và giá trị của SUM bằng SUM+i.

Bước 4: Thông báo giái trị SUM, thuật toán kết thúc.

Kết quả thực hiện thuật toán Sum = 5050.

11 tháng 2 2020

Bước 1: Gán giá trị cho 2 và biến SUM= 0 và i=0.

Bước 2: Do i=0<100 nên chuyển tới bước 3. Nếu i>100 thì chuyển tới bước 4.

Bước 3:Tăng giá trị i thêm 1 và giá trị của SUM bằng SUM+i.

Bước 4: Thông báo giái trị SUM, thuật toán kết thúc.

Kết quả thực hiện thuật toán Sum = 5050.

24 tháng 11 2021

Câu 1 :

Tham khảo

Y tưởng : xét từng số hạng trong dãy nếu số hạng > 0 thì xếp vào một biến tổng rồi chia cho số hàng đã xếp được

Input : Dãy A gồm N số nguyên a1....aN;

Output : Trung bình cộng của  các số dương;

B1 : Nhập N số nguyên a1.... aN;

B2 : TB <--- 0, dem <---- 0, i <---- 1, Tong <--- 0;

B3 : Nếu a[i] > 0 thì Tong <--- TB + a[i];

B4 : dem <--- dem + 1;

B5 : Nếu i > N thì đưa ra màn hình kết quả TB = Tong/Dem rồi kết thúc chương trình;

B 6 : i <--- i + 1 rồi quay lại B3;

Câu 2 :

Tham khảo

Ta nhận thấy rằng, bội số chung nhỏ nhất của hai số nguyên dương a, b có thể được tính theo công thức:

ab/d

trong đó d là ước chung lớn nhất của a và b.

Bởi vậy:

Nên viết hàm để tính bội chung nhỏ nhất của hai số nguyên dương vì chương trình con cần trả ra một giá trị;

- Hàm tính bội chung nhỏ nhất của hai số nguyên dương a, b cần sử dụng hàm tính ước chung lớn nhất của a và b.

- Hàm tính ước chung lớn nhất của hai số nguyên dương a, b:

function ucln (a, b: integer): integer;

var r: integer;

begin

while b>0 do begin

r: = a mod b ,a : = b ; b:= r; end; ucln:= a; and;

- Hàm tính bội chung nhỏ nhất của hai số nguyên dương a, b:

ADVERTISING Video Player is loading.

This is a modal window.

The media could not be loaded, either because the server or network failed or because the format is not supported.partner logo 

lunction bcnn(a, b: integer): integer;

begin

bcnn:= a*b div ucln(a, b);

end;

Khi đó, chương trình con tính bội số chung nhỏ nhất của hai số nguyên dương a, b như sau:

program bai4_chuong6;

use crt ;

vai

X y: integer;

function ucln(a, b: integer): integer;

var r: integer;

begin

while b>0 do begin

r:= a mod b; a: = b ,b:= r;

end; ucln:= a;

end;

txnction bcnn(a, b: integer): integer;

begin

bcnn:= a*b div ucln(a, b);

end;

Begin

clrscr;

writeln('Nhap vao hai so can tim BCNN');

write ('x=') , readln(x); write ('y=') , readln(y);

writeln('bcnn cua hai so',x:4,'va',y:4,'la',bcnn(a,b)

readln

End.

Câu 3 : chịu

 

 

 

16 tháng 3 2023

Program HOC24;

var S,n: integer;

begin

s:=1; n:=0;

while s<10 do

begin

n:=n+2;

s:=s+n;

end;

write('S= ' ,s);

readln

end.

18 tháng 3 2020

Đáp án : B. 3 phần

- Cấu trúc chung của chương trình gồm 3 phần , gồm :

+ Phần giới thiệu chương trình

+ Phần thân chương trình

+ Phần kết thúc chương trình

19 tháng 3 2020

B. 3 phần

Phần đầu: Giới thiệu ct

Phần 2: Phần thần ct

Phần cuối: Kết thúc ct

Input: a,b,c

Output: (a+b+c)/3

Mô tả thuật

-Bước 1: Nhập a,b,c

-Bước 2: Xuất (a+b+c)/3

-Bước 3: Kết thúc

27 tháng 12 2020

**Mô tả thuật toán S: 

- Bước 1: i←0; s←0;

- Bước 2: i←i+1;

- Bước 3: s←s+i;

- Bước 4: Nếu i <= 100 thì quay lại bước 2

- Bước 5: Xuất s

- Bước 6: Kết thúc thuật toán

**Mô tả thuật toán tính P:

- Bước 1: i←0; p←1;

- Bước 2: i←i+1;

- Bước 3: p←p*i;

- Bước 4: Nếu i <= 100 thì quay lại bước 2

- Bước 5: Xuất p

- Bước 6: Kết thúc thuật toán

27 tháng 12 2020

 bạn viết chương trình luôn giúp mình với đc k ạ

5 tháng 11 2018

Input :n,dãy A

Output: Tổng A( điều kiện phần tử A>= 0)

B1: Nhập n

B2: Nhập các phần tử

B3:Xét a1;a2;a3;...an >= 0 Nếu phần tử nào dương thì chuyển qua một danh sách

B4 S-< a1,a2,...an;

B5: Kết thúc thuật toán

25 tháng 10 2018

INPUT : Dãy A các số a1, a2, ..., aN (N >= 1)

OUTPUT: Giá trị MAX = max{a1, a2, ..., aN}.

thuật toán sau :

b1: MAX <- a1; I <- 1

b2: Nếu aI > MAX, gán MAX <- aI

b3: I <- I + 1

b4: Nếu I <= n, quay lại bước 2

b5: Thông báo giá trị MAX và kết thúc thuật toán