• что будет выведено на экран в результате выполения следующей программы
    Var a,b,c:integer;
    a:=-15;
    a:a*2+1;
    b:=-a;
    c:=b mod 2;
    Writeln (c=,c);
    end

Ответы 4

  • можете пожалуйста помочь с остальными?
    • Автор:

      isiahhc7g
    • 6 лет назад
    • 0
  • после знака ";" каждый раз переходи на новую строку
    • Автор:

      adrian774
    • 6 лет назад
    • 0
  • a:=-15; //переменной a присваивается значение -15a:=a*2+1; //переменной a присваивается значение a=(-15)*2+1=-29b:=-a; //переменной b присваивается противоположное значение a: b=29c:=b mod 2;//переменной c присваивается остаток от деления 29 на 2: c=1Writeln ('c=',c); //вывод cпрограмма выведет:c=1
    • Автор:

      stuart
    • 6 лет назад
    • 0
  • во-первых, если загрузить эту программу в паскаль то ничего не выведется т.к. тут допущены ошибки, вот как правильно:Var a,b,c:integer;begina:=-15;b:=-a;c:=b mod 2;Writeln('c=',c);end.в программе выводится остаток деления числа b на число cно если тебе нужно оставить действие a:=a*2+1 тогда ты должен добавить ещё одну переменную и в таком случае b будет равнять не -а, а минус эта самая переменная. я обозначила эту переменную n, вот что получаетсяVar a,b,c,n:integer;begina:=-15;n:=-a*2+1;b:=-n;c:=n mod 2;Writeln('c=',c);end.
    • Автор:

      tommycain
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years