Дано число. Если оно делится на 11, то уменьшить ч Дано число. Если оно делится на 11, то уменьшить число в 11 раз, в противном случае уменьшить число на 11.исло в 11 раз, в противном случае уменьшить число на 11.

vara:integer;beginwriteln('Введите число');read(a);if a mod 11 = 0 thena:=a div 11elsea:=a-11;writeln(a);end.