Question

Определите значение переменной с после выполнения следующего фрагмента программы: a:=100; b:=30; a:=a – b*3; if a>b then c:=a – b else c:=b – a; Ниже варианты ответа: 1) 70 2) 20 3) -20 4) 130

Answer 1

Ответ:

program Project2;

{$APPTYPE CONSOLE}

uses

 SysUtils;

   var a,b,c:integer;

begin

a:=100;

b:=30;

a:=a-b*3;

if a>b then c:=a-b

else c:=b-a;

 write (c);

end.

 2)  20

Answer 2

Давайте разберемся:

1. a := 100; - присвоение переменной a значения 100.
2. b := 30; - присвоение переменной b значения 30.
3. a := a - b*3; - вычисление значения a - b*3 (100 - 30*3 = 100 - 90 = 10) и присвоение его переменной a, теперь a = 10.
4. if a > b then c := a - b else c := b - a; - проверка условия a > b (10 > 30 - ложь), поэтому выполняется вторая часть: c := b - a;, что равно c := 30 - 10; и, следовательно, c = 20.

Итак, значение переменной c после выполнения этого фрагмента программы равно 20.

Ответ: 2) 20.