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.

Lời giải :
program hotrotinhoc ;
var a,n,i,SLN : integer ;
A: array[1..100] of integer ;
Begin
write('Nhap gia tri cua n='); readln(n);
writeln('nhap cac phan tu cua day so');
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end ;
SLN:=a[1];
for i:=2 to n do
if SLN< a[i] then SLN:=a[i];
write('So lon nhap trong day so la',SLN);
readln
end.

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

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.
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.

a) Xác định bài toán
-Input: Dãy n số
-Output: Tổng các số dương, tổng các số âm
b) Mô tả thuật toán
-Bước 1: Nhập n và nhập dãy số
-Bước 2: t1←0; t2←0; i←1;
-Bước 3: Nếu a[i]>0 thì t1←t1+a[i]
nếu a[i]<0 thì t2←t2+a[i];
-Bước 4: i←i+1;
-Bước 5: Nếu i<=n thì quay lại bước 3
-Bước 6: Xuất t1,t2
-Bước 7: Kết thúc

uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
if a[i] mod 2<>0 then t:=t+a[i];
writeln(t);
readln;
end.

#include <bits/stdc++.h>
using namespace std;
long long x,i,n,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
{
cin>>x;
t=t+x;
}
cout<<t;
return 0;
}

#include <bits/stdc++.h>
using namespace std;
long long p,q;
int main()
{
cin>>p>>q;
cout<<p+q<<" "<<p-q;
return 0;
}
B1: sum<---a1, i<---1
B2: i<---i+1
b3: nếu i<=n thì sum<---sum+i, quay lai b2
B4: In kq và kết thúc thuật toán