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...

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

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

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