Hãy xác định Input, Output và viết thuật toán cho bài toán sau: Tính tổng S=1+2+3+…+N
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.
- Xác định bài toán (0,5đ)
Input: Nhập N và dãy a 1 , a 2 , . . . , a n
Output: Đưa ra kết quả tổng S
- Thuật toán (1,75đ):
Bước 1: Nhập N và a 1 , a 2 , . . . , a n
Bước 2: S ← 0; i ← 1
Bước 3: Nếu i >Nthì đưa ra S rồi kết thúc
Bước 4: Nếu ai⟨0 thì S ←S+ a i 2
Bước 5: i ← i + 1 và quay lại Bước 3
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.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
INPUT: cạnh a, chiều cao tương ứng h
OUTPUT: diện tích tam giác S
code:
uses crt;
var a,b,s:real;
begin clrscr;
write('nhap canh:');readln(a);
<thực hiện nhập cạnh>
write('nhap chieu cao:');readln(h);
<thực hiện nhập chiều cao>
s:=a*h/2;
<tính diện tích>
write('dien tich la:',s:8:2);
<in ra diện tích>
readln;
end.
a:
#include <bits/stdc++.h>
using namespace std;
long long n,x,i,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
{
cin>>x;
t=t+x;
}
cout<<t;
return 0;
}
Input: dãy số từ 1 đến N
Ouput: Tổng của tất cả số từ 1 đến N
Thuật toán liệt kê:
Bước 1: Nhâp N
Bước 2: i←1; S←0;
Bước 3: Nếu i>N in ra S và kết thúc
Bước 4: S←S+i;
Bước 5: i←i+1; quay lại bước 3