Вычислить обратные значения тех чисел, значения которых не равны нулю, остальные оставить без изменения

@qwwweee · Регистрация: 02.11.2018

Author24 — интернет-сервис помощи студентам

даны 3 числа xyz. Вычислить обратные значения тех из них значения которых не равны нулю остальные оставить без изменения.Новые значения xyz напечатать
1 x=1,2 y=-5 z=-2
2 x=0 y=-15 z=2

@JuriiMW · 02.11.2018, 16:04

Pascal

1
2
3

. . .
x:=-x;y:=-y;z:=-z;
. . .

@Puporev · 02.11.2018, 16:13

Обратные значения это x:=1/x.
https://ru.wikipedia.org/wiki/... 0%BB%D0%BE

@qwwweee · 02.11.2018, 16:58 **[ТС]**

А как программу написать ?

Добавлено через 34 секунды
Есть полное решение ?

@ZX Spectrum-128 · 02.11.2018, 17:17

Pascal

var
  x, y, z: real;
 
begin
  readln(x, y, z);
  if x <> 0 then
    x := 1 / x;
  if y <> 0 then
    y := 1 / y;
  if z <> 0 then
    z := 1 / z;
  writeln(x, y, z);
end.

@qwwweee · 02.11.2018, 17:31 **[ТС]**

Ответ с любыми с значениями один и тот же ?

@ZX Spectrum-128 · 02.11.2018, 17:47

qwwweee, не понял вопрос. Вводите три числа, если какое-то число <> 0, то выводится оно же, а иначе 1/число.

@qwwweee · 02.11.2018, 18:16 **[ТС]**

Я сам разобрался. Дай Бог вам айтишного здоровья.

@qwwweee 0 / 0 / 0 Регистрация: 02.11.2018 Сообщений: 11
		1
	Вычислить обратные значения тех чисел, значения которых не равны нулю, остальные оставить без изменения 02.11.2018, 15:54. Показов 1812. Ответов 7 Метки нет (Все метки) даны 3 числа xyz. Вычислить обратные значения тех из них значения которых не равны нулю остальные оставить без изменения.Новые значения xyz напечатать 1 x=1,2 y=-5 z=-2 2 x=0 y=-15 z=2 0

@Puporev Почетный модератор 64304 / 47599 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	02.11.2018, 16:13	3
	Обратные значения это x:=1/x. https://ru.wikipedia.org/wiki/... 0%BB%D0%BE 0

@qwwweee 0 / 0 / 0 Регистрация: 02.11.2018 Сообщений: 11
	02.11.2018, 16:58 [ТС]	4
	А как программу написать ? Добавлено через 34 секунды Есть полное решение ? 0

@qwwweee 0 / 0 / 0 Регистрация: 02.11.2018 Сообщений: 11
	02.11.2018, 17:31 [ТС]	6
	Ответ с любыми с значениями один и тот же ? 0

@ZX Spectrum-128 6811 / 4568 / 4819 Регистрация: 05.06.2014 Сообщений: 22,438
	02.11.2018, 17:47	7
	qwwweee, не понял вопрос. Вводите три числа, если какое-то число <> 0, то выводится оно же, а иначе 1/число. 0

@qwwweee 0 / 0 / 0 Регистрация: 02.11.2018 Сообщений: 11
	02.11.2018, 18:16 [ТС]	8
	Я сам разобрался. Дай Бог вам айтишного здоровья. 0