1. Главная
  2. Библиотека
  3. Информатика
  4. Даны действительные числа А, В. Если они оба отрицательные, то заменить каждое из них его квадратом, иначе — положительные...

Даны действительные числа А, В. Если они оба отрицательные, то заменить каждое из них его квадратом, иначе — положительные из них увеличить в два раза.

«Даны действительные числа А, В. Если они оба отрицательные, то заменить каждое из них его квадратом, иначе — положительные из них увеличить в два раза.»
  • Информатика

Условие:

Разветвлённые алгоритмы

Даны действительные числа А, В. Если они оба отрицательные, то заменить каждое из них его квадратом, иначе — положительные из них увеличить в два раза.

Решение:

var

a, b:real;

begin

write('A = ');

readln(a);

write('B = ');

readln(b);

if(a 0) And (b 0) then

begin

a := Power(a, 2);

b := Powe...

Не нашел нужную задачу?

Воспользуйся поиском

Выбери предмет