Исполнитель "шифровщик" умеет выполнять команды: менять(i,j) — меняет буквы i-ю и j-ю местами, например, если задано слово кот и команда менять(1,3), результатом ее выполнения будет слово ток; сдвигать — сдвигает буквы слова вправо по кругу на один символ (последний символ попадает в 1-й), например, если задано слово ток и команда сдвигать, результатом ее выполнения будет кто; а также проверять условия еслигласный(i) еслисогласный(i) — исполнитель проверяет i-й символ и если условие выполнено, то продолжает выполнять следующую команду в строке, если нет — переходит на следующую строку программы; продолжение выполнения может быть задано командой: повторятьс(n) — повторяет выполнение команд, начиная со строки n. во избежание путаницы все строки программы пронумерованы. шифровщик выполнил программу: 1: менять(1,3) 2: менять(2,5) 3: менять(4,7) 4: менять(6,8) 5: еслигласный(1) еслигласный(8) сдвигать повторятьс(1) 6: еслисогласный(1) еслисогласный(8) сдвигать повторятьс(1) получилось слово анацимпр – какое слово было исходным?
var c:char;
begin clrscr;
write('Введите символ ');
readln(c);
case c of '0'..'9':write('Это десятичная цифра, ее код ',ord(c)); 'A'..'Z':write('Это прописная латинская буква, ее код ',ord(c)); 'a'..'z':write('Это строчная латинская буква, ее код ',ord(c));
'+','-','*':write('Это знак арифметического действия, его код ',ord(c)); //убрал знак /, он в спец. символах ';','<','=','>','?','[',']','{','}','\','/':write('Это служебный символ, его код ',ord(c)); else write('Символ не входит в указанный список') end; readln end.
1) Названием программы не может быть оператор end
2) Ошибок нет
3) Неверно написан оператор (нужно programm, вместо programma)
№2
1) Неправильно записан оператор mod. Неправильно написан знак присваивания (:=)
2) Неправильно записан оператор div. Неправильно написан знак присваивания (:=)
3) Недостаточно аргументов. Неправильно написан знак присваивания (:=)
4) Неправильно записан оператор div. Неправильно написан знак присваивания (:=). Лишний символ ^
№3
1) 1
2) Ошибка
3) 4
4) 5
5) 64
6) 10
7) 81
№4
Вообще, здесь должна быть ошибка, потому что неверно записан знак присваивания
Если представить, что там все правильно, тогда:
b=4680
a=4682