Question

1 Что будет выведено на экран после выполнения фрагмента программы: begin m:=5; If m>5 then y:=5+ m else y:=100-m; Writeln (y); end. 2 Что будет выведено на экран после выполнения фрагмента программы: begin x:=0; if x<>5 then y:=10 else y:=0; writeln (y); end. 3 Что будет выведено на экран после выполнения фрагмента программы: begin a:=12; if a>10 then n:=a+5 else n:=a-1; writeln (n); end.

Answer 1

Ответ:

1. 95

2. 10

3. 17

Объяснение:

1.

m = 5

если m > 5     (5 > 5   -   НЕТ)     то   y = 5 + m   (эту ветку мы не трогаем, т.к. условие ложно)

иначе y = 100 - m = 100 - 5 = 95

y = 95

2.

x = 0

если x <> 5     (0 <> 5   -   ДА)     то   y = 10

иначе y = 0   (эту ветку мы не трогаем, т.к. условие истинно)

y = 10

3.

a = 12;

если a > 10     (12 > 10   -   ДА)     то   n = a + 5 = 12 + 5 = 17

иначе n = a - 1   (эту ветку мы не трогаем, т.к. условие истинно)

n = 17

Answer 2

1. Первый фрагмент программы:

pascalCopy code
begin
  m := 5;
  if m > 5 then
    y := 5 + m
  else
    y := 100 - m;
  writeln(y);
end.

В данном случае значение m равно 5. Условие m > 5 не выполняется, так как m не больше 5. Поэтому выполнится ветвь else, и y будет равно 100 - m, то есть 100 - 5 = 95. На экран будет выведено число 95.

2. Второй фрагмент программы:

pascalCopy code
begin
  x := 0;
  if x <> 5 then
    y := 10
  else
    y := 0;
  writeln(y);
end.

Значение x равно 0. Условие x <> 5 выполняется, так как x не равно 5. Следовательно, выполнится ветвь if, и y будет равно 10. На экран будет выведено число 10.

3. Третий фрагмент программы:

pascalCopy code
begin
  a := 12;
  if a > 10 then
    n := a + 5
  else
    n := a - 1;
  writeln(n);
end.

Значение a равно 12. Условие a > 10 выполняется, так как a больше 10. Следовательно, выполнится ветвь if, и n будет равно a + 5, то есть 12 + 5 = 17. На экран будет выведено число 17.