uses crt;

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

i,n,j:integer;

tam:real;

begin

clrscr;

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

for i:=1 to n do 

begin

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

end;

for i:=1 to n-1 do 

  for j:=i+1 to n do 

if a[i]>a[j] then

begin

tam:=a[i];

a[i]:=a[j];

a[j]:=tam;

end;

writeln('Day tang dan la: ');

for i:=1 to n do

  write(a[i]:4:2,' ');

writeln;

writeln('Day giam dan la: ');

for i:=n downto 1 do 

  write(a[i]:4:2,' ');

readln;

end.

uses crt;

const fi='input.txt'

var f1:text;

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

n,i,max:integer;

begin

clrscr;

assign(f1,fi); rewrite(f1);

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

for i:=1 to n do

begin

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

end;

max:=a[1];

for i:=1 to n do 

  if max<a[i] then max:=a[i];

writeln(f1,max);

close(f1);

readln;

end.

Mình nghĩ b gửi thiếu đề roi. Tại tổng của tất cả số hạng bằng không thì nó cũng sẽ bằng 0. Mình làm có gì b sửa lại sau nhé, nếu có gì thắc mắc phản hồi ở dưới mình sẽ giải thích cho b.

a)

Input: N và dãy a1,a2,...,an

Output: Tổng các số hạng bằng 0

b)

Bước 1: Nhập N và dãy a1,a2,...,an

Bước 2: i←1; t←0;

Bước 3: Nếu i>N thì in ra kết quả rồi kết thúc thuật toán

Bước 4: Nếu ai=0 thì t←t+ai;

Bước 5: i←i+1, quay lại bước 3

#include <bits/stdc++.h>

using namespace std;

long long nn,i,x,n;

int main()

{

cin>>n;

nn=LLONG_MAX;

for (i=1; i<=n; i++)

{

cin>>x;

nn=min(nn,x);

}

cout<<nn;

return 0;

}

$Cu \to CuO \to CuSO_4 \to CuCl_2 \to Cu(NO_3)_2 \to Cu(OH)_2$

$2Cu + O_2 \xrightarrow{t^o} 2CuO$
$CuO + H_2SO_4 \to CuSO_4 + H_2O$
$CuSO_4 + BaCl_2 \to BaSO_4 + CuCl_2$
$CuCl_2 + 2AgNO_3 \to Cu(NO_3)_2 + 2AgCl$
$Cu(NO_3)_2 + 2KOH \to Cu(OH)_2 + 2KNO_3$

CuSO4 ------> CuCl2--------> Cu(NO3)2 -------> Cu(OH)2 ------> CuO-----> Cu

\(CuSO_4+BaCl_2\rightarrow BaSO_4+CuCl_2\)

\(CuCl_2+2AgNO_3\rightarrow Cu\left(NO_3\right)_2+2AgCl\)

\(Cu\left(NO_3\right)_2+2NaOH\rightarrow Cu\left(OH\right)_2+2NaNO_3\)

\(Cu\left(OH\right)_2-^{t^o}\rightarrow CuO+H_2O\)

\(CuO+H_2-^{t^o}\rightarrow Cu+H_2O\)