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

помогите с задачами по информатике решить 2 задачи и записать как в паскале

  1. Ответ на вопрос
    Ответ на вопрос дан tamerlan1011

    Задача1. (на паскале давно не программировал, поэтому возможны огрехи, саого паскаля под рукой нет.)

     

    Program zadanie1;

    var

    a,b,c: real;

    begin

    wtiteln('Vvedite A');

    readln(a);

    writeln('Vvrdite B');

    readln(b);

    writeln('Vvedite C');

    readln(c);

    if ((a>b)and(b>c))or((a<b)and(b<c)) then

       begin

       a:=a*2;

       b:=b*2;

       c:=c*2;

       end;

    else

       begin

       a:=a*(-1);

       b:=b*(-1);

       c:=c*(-1);

       end;

    writeln('a=');

    writeln('b=');

    writeln('c=');

    end.

     

    Решил исходя из того, что в случае если условие не выполняется значение чисел меняется на обратное по знаку.

     

    Задача 2.

     

    program Zadanie2;

     

    var

     

    A,B,C:integer;

     

    begin

     

    writeln('Введите числa A,B и C: ');

     

    readln(A,B,C);

     

    if (C = B) then

     

    writeln('Номер числа, отличного от остальных: ',1)

     

    else

     

    if (A = C) then

     

    writeln('Номер числа, отличного от остальных: ',2)

     

    else

     

    writeln('Номер числа, отличного от остальных: ',3);

     

    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) их не спросили

Информация

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