case of Опции

[L_E_X]

Вообщем вводишь число в диапозоне от 1 до 100., в ответе должно отобразиться например: вводишь 10, ответ ворон, или 73 - то вороны, 55 - ворон .

вообщем чтобы окончания совпадали с цифрой

[Lapp]

вообщем чтобы окончания совпадали с цифрой

Только не совпадали с цифрой, а соответствовали числу..

  write(n,' ворон');
  if n div 10 <> 1 then
    case n mod 10 of
      1: write('а');
      2..4: write('ы')
    end;
  writeln;

[L_E_X]

Только не совпадали с цифрой, а соответствовали числу..

  write(n,' ворон');
  if n div 10 <> 1 then
    case n mod 10 of
      1: write('а');
      2..4: write('ы')
    end;
  writeln;

спасиба!