//PascalABC.NET 3.1 сборка 1230 function sum(a, b: real) := a b; function bet(a, b: real) := a - b; function mult(a, b: real) := a * b; function divis(a, b: real) := a / b; begin var a := ReadReal('Введите два числа:'); var b := ReadReal; WritelnFormat('{0} {1} = {2}', a, b, sum(a, b)); WritelnFormat('{0} - {1} = {2}', a, b, bet(a, b)); WritelnFormat('{0} * {1} = {2}', a, b, mult(a, b)); WritelnFormat('{0} / {1} = {2}', a, b, divis(a, b)); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
