Відповідь:
#include <iostream>
#include <cstdlib>
#include <time.h>
using namespace std;
void randarr(int *D,int N){
for(int i = 0; i < N; i++){
D[i] = rand() % 100 + 0;
}
}
void printarr(int *D,int N){
for(int i = 0; i < N; i++){
cout << D[i] << " ";
}
}
void swapkm(int *D,int N,int m,int k){
int mt,kt;
for(int i = 0; i < m; i++){
mt = D[i];
}
for(int j = 0; j < k; j++){
kt = D[j];
}
cout << "м-тый елемент = " << mt << endl;
cout << "k-ый елемент = " << kt << endl;
cout << "Меняем местами " << mt << " и " << kt << endl;
swap(D[m-1],D[k-1] );
}
int main(){
srand(time(NULL));
setlocale(LC_ALL , "Rus");
int N,m,k;
cout << "Введите размер массива: ";
cin >> N;
int *D = new int[N];
randarr(D,N);
printarr(D,N);
cout << "\nМеняем m-ый и k-ый елементы местами..." << endl;
cout << "Введите номер m-ого елемента: ";
cin >> m;
cout << "Введите номер k-ого елемента: ";
cin >> k;
swapkm(D,N,m,k);
printarr(D,N);
delete[] D;
return 0;
}
Program Num3;
Uses Crt;
var a,b,c,n,s:integer;
begin
clrscr;
write('Введите 3 числа: ');
readln(a,b,c);
n:=0;s:=0;
if (a mod 2)=0 then
begin
n:=n+1;
s:=s+a;
end;
if (b mod 2)=0 then
begin
n:=n+1;
s:=s+b;
end;
if (c mod 2)=0 then
begin
n:=n+1;
s:=s+c;
end;
if (n=0) then writeln('Нету чётных чисел вообще !! ')
else writeln('Количество чётных чисел:',n,'Их сумма: ',s);
readkey;
end.