Удачи в изучении языка.
#include <iostream>
#include <clocale>
using namespace std;
int main()
{
setlocale(LC_ALL, "Russian");
int n;
int *a;
cout << "Введите размер массива : ";
cin >> n;
a = new int[n];
int k = 0;
for (int i = 0; i < n; i++)
cin >> a[i];
cout << "Четные элементы : ";
for (int i = 0; i < n; i++)
if (a[i] % 2 == 0)
{
cout << " " << a[i];
k++;
}
cout << endl;
cout << "Количество четных чисел: " << k << endl;
for (int i = 1; i < n; ++i) //Пузырьковая сортировка
{
for (int t = 0; t < n - i; t++)
{
if (a[t] < a[t + 1])
{
int temp = a[t];
a[t] = a[t + 1];
a[t + 1] = temp;
}
}
}
cout << "Отсортрованный массив по убыванию: ";
for (int i = 0; i < n; i++)
cout << a[i] << " ";
cout << endl;
system("pause");
return 0;
}
1) Пароль в этом коде - "zn4n1j4". Заменить при необходимости.
var
i: integer;
s: string;
begin
i := 1;
while i <= 5 do
begin
readln(s);
if s = 'zn4n1j4' then
begin
writeln('Вход в систему разрешен');
exit;
end;
writeln('Неверный пароль.');
end;
writeln('Пароль не был угадан 5 раз.');
end.
2) Используем операцию x mod 10 для получения последней цифры числа и x div 10 для "отбрасывания" последней цифры числа.
var
x, ans: integer;
begin
read(x);
ans := 0;
while x <> 0 do
begin
ans := ans + (x mod 10);
x := x div 10;
end;
writeln(ans);
end.
