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.

13 tháng 6 2021

Đề thi tin học trẻ BT phải ko b?

Mà bài này giải sao nhỉ?

Muốn xem code để tham khảo quá!!!

30 tháng 7 2021

sắp xếp lại các phần tử theo chiều tăng dần rồi đặt kết quả muốn tìm = 1, so sánh nó với từng phần tử trong mảng, nếu bé hơn thì dừng chương trình và đó là kết quả, nếu không thỉ cộng kết quả cho phần tử đang được so sánh.

code :

program giai;uses crt;var n,m,i,c,t : integer;A : array[1..100] of integer;beginclrscr;write('so phan tu cua day so :');readln(m);for i:=1 to m do    begin         readln(A[i]);    end;for i:= 1 to m do    for n:=i+1 to m do        if A[i] > A[n] then        begin        c:= A[i];        A[i] := A[n];        A[n] := c;        end;t:= 1;for i:=1 to m-1 do    if t < A[i]    then    break    else t:= t+ A[i];writeln(t);readln;end. 
1. Nhập vào một số n (5<=n<=10) và n phần tử của dãy Ai với 1<Ai<100 (có kiểm tra dữ liệu khi nhập vào. Viết chương trình, thuật toán a. In ra các phần tử là số nguyên tố của dãy b. Tính ƯCLN của tất cả các phần tử của dãy c. Tính biểu thức sau: S=ai1+ai2+ai3+...+ann d. Sắp xếp và in ra dãy sau sắp xếp 2. Viết chương trình, thuật toán tối giản phân số bằng cách chia cả tử và mẫu cho...
Đọc tiếp

1. Nhập vào một số n (5<=n<=10) và n phần tử của dãy Ai với 1<Ai<100 (có kiểm tra dữ liệu khi nhập vào. Viết chương trình, thuật toán

a. In ra các phần tử là số nguyên tố của dãy

b. Tính ƯCLN của tất cả các phần tử của dãy

c. Tính biểu thức sau: S=ai1+ai2+ai3+...+ann

d. Sắp xếp và in ra dãy sau sắp xếp

2. Viết chương trình, thuật toán tối giản phân số bằng cách chia cả tử và mẫu cho ƯCLN

3. Viết chương trình con tính xy với x,y là 2 stn được nhập từ bàn phím

4. Viết chương trình con tính giai thừa của n với n stn được nhập từ bàn phím

5. Viết chương trình, thuật toán tìm số hoàn chỉnh, số chính phương, số nguyên tố và BCNN

6. Nhập giá trị của mảng chia hết cho 3 và 5. Sắp xếp các phần tử chia hết cho 3 và 5 theo chiều tăng dần

7. Nhập dữ liệu cho các phần tử của mảng và đưa ra màn hình mảng vừa nhận. Tính tổng của các giá trị của các phần tử tính từ các phần tử lẻ đến số lượng các phần tử lẻ

8. Viết chương trình dùng câu lệnh repeat until Tính tổng của \(A=\dfrac{1}{1\cdot3}+\dfrac{1}{2\cdot4}+...+\dfrac{1}{n\left(n+2\right)}\)

9. Viết chương trình tính hàm \(e^x=1+x+\dfrac{x^2}{2!}+....+\dfrac{x^n}{n!}\)

10. Viết chương trình tính an với a,n được nhập từ bàn phím

Các Bn viết đầy đủ thuật toán, chương trình giúp Mk nhé

1
23 tháng 3 2018

dài thế thì ai rảnh mà làm

30 tháng 10 2019

đề thi khảo sát hsg trường thôi mà mn

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.

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

18 tháng 7 2017

thi rhiha

20 tháng 11 2017

Program bai1;

uses crt;

var a: array [1..100] of integer;

i,n,min,s: integer;

begin

clrscr;

write('nhap n ='); readln(n);

for i:= 1 to n do

begin

write('nhap a[',i,'] ='); readln(a[i]);

end;

min:=a[1];

s:=0;

for i := 1 to n do

s:=s+a[i];

write('tong cac day so trong mang =',s :4);

writeln;

for i:= 1 to n do

if min > a[i] then min:=a[i];

write('so nho nhat trong day la :' ,a[i]);

readln;

end.

13 tháng 2 2022

Ý tưởng: Tìm số lớn nhất trong hai dãy đã cho. Không mất tính tổng quát, giả sử số lớn nhất của 2 dãy nằm trong dãy a, ta xét các số trong dãy b, tại vị trí i:  nếu a[i] < b[i] thì hoán vị a[i] và b[i]. Sau đó tìm số lớn nhất trong dãy b rồi nhân với số lớn nhất của hai dãy sẽ ra được kết quả. 

#include <iostream>

using namespace std;

#define maxN 105

 

int main() {

int a[maxN], b[maxN];

int t;

cin >> t;

while (t--)

{

int n;

cin >> n;

int maxA = 0, maxB = 0;

for (int i = 0; i < n; i++)

{

cin >> a[i]; maxA = max(a[i], maxA);

}

for (int i = 0; i < n; i++)

{

cin >> b[i]; maxB = max(b[i], maxB);

}

if (maxA < maxB) 

swap(a, b);

int maxV = max(maxA, maxB);

for (int i = 0; i < n; i++)

if (b[i] > a[i]) 

swap(b[i], a[i]);

maxB = 0;

for (int i = 0; i < n; i++)

maxB = max(b[i], maxB);

cout << maxB * maxV << endl;

}

return 0;

}