Задание:
Из 2 чисел, максимальное увеличить в 2 раза, а минимальное уменьшить в 2 раза. Нарисоватьблок-схему
Решение:
var a,b,max,min: integer; beginread (a,b); if (a>b) then max: =a; else max: =b; if (a
Знаете другой ответ?
Из 2 чисел, максимальное увеличить в 2 раза, а минимальное уменьшить в 2 раза. Нарисоватьблок-схему
var a,b,max,min: integer; beginread (a,b); if (a>b) then max: =a; else max: =b; if (a
Знаете другой ответ?