Var
s:string;
t,c:string;
function Palindrome(s:string):boolean;
var
i:integer;
begin
for i:= 1 to s.Length div 2 do
if s[i] <> s[s.Length-i+1] then
begin
Palindrome:=false;
exit;
end;
Palindrome:= true;
end;
begin
Readln(s);
c:=copy(s,1, s.Length div 2);
t:=copy(s,s.Length div 2 + 1, s.Length);
if (Palindrome(s))and(Palindrome(c))and(Palindrome(t)) then
Writeln('YES')
else
Writeln('NO');
end.
<u>Пример:</u>
ACAACA
YES
Ответ:
ССССО
Объяснение:
Закодируем следующим образом
Л - 0, Н - 1, 0 - 2, С - 3
Получаем
00000
00001
00002
00003
00010...
Получаем кодировку с основанием 4, где на 1-м месте 0, на втором - 1, на третьем - 2, на четвертом - 3 , на пятом - 4. Видим закономерность, что позиция и номер отличаются на один. Значит на 1023 будет стоят число 1022 переводим в систему с основанием 4. Получаем 33332. Теперь заменяем соответствующими буквами ССССО.
Решение, задачи "Даны действительные числа 1,2,…70. Вывести последовательность 2,3,…,70,1". см. Файл.
P.S. Решение на указателях.
gcc: 4.8.1
Исходные данные:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 <span>44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70
После сдвига:
2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 1</span>
Ответ "В"..........................................
Ответ:
#include <iostream>
#include <time.h>
using namespace std;
int main()
{
int n, i;
double z, s;
double* a = NULL;
setlocale(LC_ALL, "Russian");
cout << "\nВведите размерность массива: ";
cin >> n;
a = new double [n];
srand(time(NULL));
for (i = 0; i < n; i++) {
a [i] = (double)rand() / (RAND_MAX + 1) * 5;
cout << a[i] << " ";
}
cout << "\nВведите число для поиска: ";
cin >> z;
s = 0;
for (i = 0; i < n; i++) {
if (abs (a[i] - z) < 0.1) // поиск z в массиве, 0.1: сравнение чисел с точность до 1 знака после запятой
s += a[i];
}
cout << "\nСумма = " << s << "\n";
}