uses crt; var c:char; crand:integer; begin randomize; crand:=random(122,97); read(c); if ord(c)=crand then writeln('Вы угадали!') else writeln('Вы не угадали. Правильный ответ "',chr(crand),'"'); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
