Ошибка есть и она не одна.
1. Код приведен не полностью - после else должно быть что-то еще и обязательно замыкаться end.
2. abc - не такой функции в Паскале, возможно Вы имели в виду abs - абсолютная величина, т.е. модуль.
3. if ab then ... это тоже не верно, т.к. ab - не является логическим выражением или булевой пременной - видимо не дописал: if ab>ac then...
<span>106
function f(x: integer): integer;
var
L, M: integer;
begin
L := x - 12;
M := x + 12;
while L <> M do
if L > M then
L := L - M
else
M := M - L;
f := L;
end;
begin
var x := 100;
var r := 0;
repeat
x := x + 1;
r := f(x);
until r = 2;
writeln(x);
end.
</span>
Сначала жмем на правую нижнюю кнопочку, обозначенную цифрой один на рисунке, потом на кнопочку с самолетом, обозначенную цифрой два на рисунке.
Включается и отключается одной и той же кнопкой
А) Вкус - язык
Б) Обоняние(нос), зрение (глаза)
В) зрение (глаза)
Г) Осязание - пальцы
Д) Обоняние (нюх) зрение(глаза) слух(уши)
Е) зрение (глаза) осязание, слух