А вообще, советую во-первых, читать текст, который выводит компилятор (читай сообщения об ошибках), а во-вторых, скачай PyCharm - там такие штуки тебе легче заметить будет
Var i, a, b, n, n2, j: longint; s: string; flag: boolean;
begin Write('Введите натуральное число больше 11: '); Readln(a); if a <= 11 then Writeln('11 - первое симметричное число') else begin Str(a, s); n := Length(s); n2 := n div 2; flag := true; i := 1; repeat flag := (s[i] = s[n - i + 1]); i := i + 1 until (not flag) or (i > n2); if flag then Write('Число симметричное') else Write('Число несимметричное') end; end.
Тестовое решение:
Введите натуральное число больше 11: 123454321 Число симметричное
Точнее сказать - чем word отличается от программы Writer из пакета OpenOffice. Word имеет больше функций. Это важно тем, кто много профессионально работает с текстами. Кстати, Word 2010 умеет сохранять в PDF. Зато Writer может читать все форматы Word, а Word не может читать формат Writer - формат .odt. Word - платный. Если сравнивать OpenOffice с Word 2007 и выше, то они отличаются друг от друга совершенно разным расположением кнопочек и панелей. Если ты привык к Word, то тяжело привыкать к OpenOffice. И наоборот. Это я знаю по себе. Но это - дело привычки. Есть целые предприятия, которые перешли но OpenOffice. Еще могу сказать, что Writer дольше запускается. Правда, потом работает без тормозов. Вывод: нельзя сказать, какой лучше. Если для себя - то достаточно OpenOffice поставить, ибо он уже стабильный и по-честному бесплатный.
После условия двоеточие
if (2*x-8) == 1:
А вообще, советую во-первых, читать текст, который выводит компилятор (читай сообщения об ошибках), а во-вторых, скачай PyCharm - там такие штуки тебе легче заметить будет