Program asd; USES crt; Var a,b:integer; BEGIN Clrscr; a:=random(5); b:=random(5); Writeln(' ',a,' ',b); If a>=b then Writeln(a) else Writeln(b); Readln; END. Сейчас блок схему напишу.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.