#include <iostream>
using namespace std;
int main(){
    int n;
    cin >> n;
    int a[n];
    for (int i=0; i<n; i++) cin >> a[i];
    for (int i=0; i<n; i++) if (a[i]%2==1) cout << a[i] << " ";
    int s=0;
    for (int i=0; i<n; i++) if (a[i]%2==0) s=s+a[i];
    cout << endl << s << endl;
    for (int i=0; i<n; i++){
        bool ktnt = true;
        for (int j=2; j<a[i]; j++){
            if (a[i]%j==0) ktnt=false;
        }
        if (ktnt) cout << a[i] << " ";
    }
}

$\color{red}{\text{#Daoanhviet96}}$

uses crt;
var n,i,t,kt,j:integer;
a:array[1..100]of integer;
begin
clrscr;
write('n='); readln(n);
for i:=1 to n do
begin
write('a[',i,']='); readln(a[i]);
end;
{------------------xu-ly------------------------}
writeln('cac so le trong day so la: ');
for i:=1 to n do
if a[i] mod 2=1 then write(a[i]:4);
writeln;
t:=0;
for i:=1 to n do
if a[i] mod 2=0 then t:=t+a[i];
writeln('tong cac phan tu chan trong day la: ',t);
writeln('cac so nguyen to trong day la: ');
for i:=1 to n do
if a[i]>=2 then
begin
kt:=0;
for j:=2 to i-1 do
if a[i] mod j=0 then kt:=1;
if kt=0 then write(a[i]:4);
end;
readln;
end