Program asd; USES crt; var a,b,c,min:real; BEGIN clrscr; Writeln('Vvedite x: '); Readln(a); Writeln('Vvedite y: '); Readln(b); Writeln('Vvedite z: '); Readln(c); min := a; if b < min then min := b; if c < min then min := c; Writeln('Minimalnoe chislo: ',min); Readln; END.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.