1. Как развивалась вычислительная техника? 2. Каковы перспективы развития ВТ в будущем

106

481

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

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

meladse1105

Информатика

4,6(39 оценок)

Var x, y: real; begin readln(x, y); if ((x < 0) and (y < 0)) then begin x : = abs(x); y : = abs(y); end else if < 0) and (y > = 0)) or ((x > = 0) and (y < then begin x += 0.5; y += 0.5; end else if .5 < = x) and (x < = 2)) or ((0.5 < = y) and (y < = then begin x /= 10; y /= 10; end; writeln(x, ' ', y); end.