Program gfh; uses crt; var a, b:integer; Begin clrscr; a:=random(50 50 1)-50; If (a<-9) and (a>9) then b:=a mod 10; If (b=1) then writeln(b); If (a=1) then writeln(a); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.