profile
Опубликовано 6 лет назад по предмету Информатика от Lebedysha

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

  1. Ответ
    Ответ дан Tlalok

    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.

Самые новые вопросы