Составить программму которая увеличивает значение выражения (a-b)*15 Если результат больше 100,то вывести соответствущее сообщение Если результат меньше или равен,то вывести только число Помогите пожалуйста решить:)

Есть ответ
12.12.2022
430

Ответ


var

  a, b:real;

begin

  write('a = '); readln(a);

  write('b = '); readln(b);

  if (a - b) * 15 > 100 then

    writeln('Результат больше 100')

  else

    writeln('(', a, ' - ', b, ') * 15 = ', (a - b) * 15 );

end.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
12.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.