Составьте программу, заменяющую из двух данных чисел меньшее число модулем разности, а большее - модулем произведения этих чисел.

161

289

Посмотреть ответы 2

Ответы на вопрос:

martsenyuk30

Информатика

4,4(60 оценок)

//pascal abc.net 3.1 сборка 1256 var a,b,c: integer; begin read(a,b); if a< b then begin c: =a; a: =abs(a-b); b: =abs(c*b); end else begin c: =b; b: =abs(a-b); a: =abs(a*c); end; writeln('a=',a); write('b=',b); end. пример ввода: -3 4 пример вывода: a=7 b=12

motovsavelymotOv

Информатика

4,7(4 оценок)

Семь раз получаем остаток от деления на 10 и делим число на 10, тип числа целый, чтобы при каждом делении было округление int n = число; int a[7]; for (int i = 0; i < 7; ++i) { a[i] = n % 10; n /= 10; }