Старая задачка)
8126+8126=16252
На с++
#include <iostream>
#include <math.h>
using namespace std;
int main()
{
int n, i, j, k(0),s(0);
cout << "vvedite kol-vo elementv \n";
cin >> n;
int *a = new int[n];
cout << "zapolnite massiv \n";
for (i = 0; i < n; i++)
{
cout << "a[" << i << "]=";
cin >> a[i];
}
for (i = 0; i<n; i++) {
k = 0;
for (j = 0; j<n; j++)
if (a[i] == a[j]) k++;
if (k == 1)
s++;
}
cout << "otvet: " <<s << endl;
return 0;
}
Var
i,n:integer;
IsOdd,IsEven:boolean;
begin
IsOdd:=false; IsEven:=false;
Write('Введите три числа: ');
for i:=1 to 3 do
begin
Read(n);
if n<>0 then
if (n mod 2)=0 then IsEven:=True
else IsOdd:=True
end;
Write('Среди введенных чисел ');
if IsOdd then Write('есть нечетное')
else Write('нет нечетных');
if IsEven then Write(' и есть четное')
else Write('и нет четных')
end.
<em><u>Тестовое решение:</u></em>
Введите три числа: 5 8 3
Среди введенных чисел есть нечетное и есть четное
1) Ошибка "Нельзя преобразовать тип real к integer"
При исправлении
var
a, b: real;
begin
a := 26 mod 11;
b := 3;
b := 6 + a * b;
a := b / 3 * a;
writeln(a);
end.
выдает 24
2) 52
1)
Л -> b
е -> a
ш -> c
a -> не определена
2) Е - здесь pred - предыдущий символ, succ - последующий символ
3) 67 - здесь код латинской заглавной буквы F равен 70, поэтому:
pred(70-2) = pred (68) = 67