Программа в паскаль которая выбирает рандомно одну из надписей.

Question

Программа в паскаль которая выбирает рандомно одну из надписей.

Answer 1

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  Randomize;
  case Random(1,3) of
  1:Writeln('Скоро каникулы!');
  2:Writeln('Надоела мне учеба!');
  3:Writeln('Не хочу заниматься информатикой!')
  end
end.