profile
Размещено 5 лет назад по предмету Информатика от tosyaryzhkova

ПОМОГИТЕ НАПИСАТЬ ПРОГУ В ПАСКАЛЕ. БЕЗ ELSE И NOT

  1. Ответ на вопрос
    Ответ на вопрос дан Аккаунт удален
    // PascalABC.NET 3.2, сборка 1367 от 20.12.2016
    // Внимание! Если программа не работает, обновите версию!

    begin
      var x,a,betta,y:real;
      Write('Введите через пробел x, бета, a: ');
      Read(x,betta,a);
      y:=((x>1) and (x<3))?sqrt(1+x):x in [4.1,5.2]?x*x-sin(3*betta):
        sqr(cos(x))/sqrt(abs(x+a));
      Writeln('y=',y)
    end.

    Примеры для проверки всех трех формул
    Введите через пробел x, бета, a: 2.1 0.17 3
    y=1.7606816861659

    Введите через пробел x, бета, a: 5.2 -9.6 5.18
    y=26.5382106989794

    Введите через пробел x, бета, a: -2 0 1.3
    y=0.206987526684641
  2. Ответ на вопрос
    Ответ на вопрос дан Aillianna
    var
        x, a, betta, y: real;

    begin
        Write('Введите через пробел x, бета, a: ');
        Read(x, betta, a);
        
        y := sqr(cos(x)) / sqrt(abs(x + a));
        if (x > 1) and (x < 3) then y := sqrt(1 + x);
        if (x = 4.1) or (x = 5.2) then y := x * x - sin(3 * betta);
        
        Writeln('y=', y)
    end.

    Программа не предусматривает возможность деления на ноль и прочих неожиданностей
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.