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
Program Kvadrat;
var a:real;
begin
writeln('Введите длину стороны квадрата');
readln(a);
writeln('Площадь квадрата = ', sqr(a));
end.
<span>Панель задач
это помещенная по умолчанию внизу рабочего стола панель, которая содержит кнопку "Пуск", кнопки выполняющихся приложений, панели инструментов, область уведомлений (трей) и системные часы. Настроенная панель задач может значительно облегчить работу с компьютером, обеспечив быстрый доступ к часто используемым функциям и системным сервисам.
Щелкнув правой кнопкой мыши на пустом месте панели задач, вы увидите контекстное меню для доступа к некоторым функциям ОС а также настройке самой панели и меню "Пуск". Отсюда можно вызвать "Диспетчер задач", сгруппировать открытые окна приложений, свернуть или развернуть все открытые окна.
В контекстном меню снимите галочку с пункта "Закрепить панель задач". Панель стала разбита на участки, которые можно сдвигать влево и вправо, а также вверх и вниз для расширения места выделяемого под ту или иную функцию, или перемещать к любой стороне экрана. Как правило, одной строки маловато, поэтому лучше растянуть панель по высоте на две строки.
В контекстном меню есть пункт "Панели инструментов", который предлагает несколько стандартных панелей:</span>Адрес - эта панель удобна для ввода веб-адресов и перехода на веб-страницы; Ссылки - это панель, которая по умолчанию встроена в IE и содержит веб-адреса для поддержки продуктов Microsoft;
Языковая панель - отображает индикатор раскладки клавиатуры - показывает RU или EN в зависимости от текущей раскладки клавиатуры;
Рабочий стол - содержит ссылки с выпадающими меню к ярлыкам или программам, расположенным на рабочем столе;
Быстрый запуск - очень удобная панель, в нее можно простым перетаскиванием поместить ярлык на нужную программу, и она будет запускаться одним нажатием кнопки. Это намного удобнее, чем размещение ярлыков на рабочем столе.<span>
</span>
1. Программа 10 раз прибавляет 9 к нулю =>
s = 9 * 10 = 90
Ответ: 90.
2. Программа 7 раз отнимает 7 от 50 =>
m = 50 - 7 * 7 = 1
Ответ: 1.
3. Программа прибавляет удвоенный индекс цикла (от 2 до 9) к нулю
s = 2 * (2 + 3 + 4 + 5 + 6 + 7 + 8 + 9) = 88
Ответ: 88.
4.
a = 30; b = 6
a = 30 / 2 * 6 = 15 * 6 = 90; b = 6
a > b = 90 > 6 = true =>
a = 90; c = 90 - 12 * 6 = 90 - 72 = 18
Ответ: 18.
5.
a = 5; c = 3
a = 5; c = 7 + 5 * 3 = 7 + 15 = 22
a = 22 / 2 * 5 = 11 * 5 = 55; c = 22
Ответ: 55.
1) считаешь кол-во цифр, и сопостовляешь им степени 2 сомому правому-2^0
2) слагаешь их
пример: 11001=1*2^4+1*2^3+0*2^2+0*2^1+1*1^0= 16+8+0+0+1=25