Даны 3 числа(а,в,с). составьте программу, которая меняет местами max и min элементы.не массив.

176

357

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

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

даша3609

Информатика

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

Var a,b,c,d: integer; begin writeln('a, b, c: '); readln(a,b,c); if (a> b)and(a< c)or(a> c)and(a< b) then begin d: =b; b: =c; c: =d; end else if (b> a)and(b< c)or(b> c)and(b< a) then begin d: =a; a: =c; c: =d; end else begin d: =a; a: =b; b: =d; end; writeln('a = ',a,' b = ',b,' c = ',c); end. пример: a, b, c: 8 5 2 a = 2 b = 5 c = 8

Julia1965

Информатика

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

Var a,b,c: integer; max,min: integer; begin readln(a,b,c); if ((a> =b)and(a> =c)and(b< =c))or((b> =a)and(b> =c)and(a< =c)) then swap(a,b) else if ((a> =b)and(a> =c)and(c< =b))or((c> =b)and(c> =a)and(a< =b)) then swap(a,c) else if ((b> =a)and(b> =c)and(c< =a))or((c> =b)and(c> =a)and(b< =a)) then swap(b,c); writeln(a,' ',b,' ',c); end.

ФрискТок

Информатика

4,5(79 оценок)

1) 101 111 + 111 011 1 101 010 111 010 011+ 1 101 010 1000 111 1012) 101 110 001 - 111 101 100 110 100 3) 111 001 * 1 001 111 001 + 111001 1 000 000 001 4) 100 011 | 1110 11 10 | | 10,1 1110 1110