TURBO PASCAL. Определите значение целочисленных переменных a и b после выполнения...

Question

TURBO PASCAL. Определите значение целочисленных переменных a и b после выполнения фрагмента программы:
a := 42;
b := 14;
a := a div b;
b := a*b;
a := b div a;

Answer 1

a := 42;
b := 14;
a := a div b; -> a:=целая часть 42/14, т.е. 3
b := a*b; -> b:=3*14, т.е. 42
a := b div a; -> a:=целая часть 42/3, т.е. 14
Ответ: a=14, b=42