Дан алгоритм. program N; var a, b, c, d, mx1, mx2, mx: integer; begin readln(a, b, c, d); if a > b then mx1 := a else mx1 := b; if c > d then mx2 := c else mx2 := d; if mx1 > mx2 then mx := mx1 else mx := mx2; writeln(mx1); end. Выберите верный вариант формулировки задачи, которую решает предложенный алгоритм.
ПОЛУЧИТЬ ОТВЕТ Дан алгоритм. Program N; var a, b, c, d, mx: integer; Begin readln(a, b, c, d); mx := a; if b > mx then mx := b; if c > mx then mx := c; if d > mx then mx := d; writeln(mx); End. Выберите верный вариант формулировки задачи, которую решает предложенный алгоритм.
Определите значение переменной c после выполнения следующего фрагмента программы. Ответ запишите в виде целого числа. a := 28; b := 5; c := a - 3 * b; if a - 3 * b > b then c := с - b;
Ученик записал фрагмент программы для решения задачи: "Два заданных числа одинакового знака увеличить на 10, оставить их без изменения в противном случае". Выберите все условия, которые могут быть записаны вместо многоточия в команде ветвления. Readln(x); Readln(y); If (...) Then Begin x := x + 10; y := y + 10; End;
Дан алгоритм. program N; var a, b, c, d, mx1, mx2, mx: integer; begin readln( a, b, c, d); if a > b then mx1 := a else mx1 := b; if c > d then mx2 := c else mx2 := d; if mx1 > mx2 then mx := mx1 else mx := mx2; writeln( mx1 ); end. Выберите верный вариант формулировки задачи, которую решает предложенный алгоритм.
Определите значение переменной c после выполнения следующего фрагмента программы. Ответ запишите в виде целого числа. a := 28; b := 5; c := a - 3 * b; if a - 3 * b > b then c := с - b;
Дан алгоритм. Program N; var a , b , c , d , mx : integer; Begin readln ( a , b , c , d ); mx := a; if b > mx then mx := b; if c > mx then mx := c; if d > mx then mx := d; writeln ( mx ); End. Выберите верный вариант формулировки задачи, которую решает предложенный алгоритм.
