Сэтими примерами 1) определите значение целочисленных переменных x и y после выполнения фрагмента программы: x : = 336 у : = 8; x : = x div y; y : = х mod у; 2) определите значение целочисленных переменных a и b после выполнения фрагмента программы: а : =1686; b : =(a div 10) mod 5; а : = а - 200*b; 3)определите значение целочисленных переменных x и y после выполнения фрагмента программы: х : = 11; у : = 5; t : = y; у : = х mod у; x : = t; у : = у + 2*t; 4) определите значение целочисленных переменных x и y после выполнения фрагмента программы: х : = 19; у : = 3; z : = у*2; у : = х mod у; х : = х - z; у : = у + z; 5)определите значение целочисленных переменных x, y и z после выполнения фрагмента программы: х : = 13; у : = 3; z : = x; x : = z div у; у : = х;

Код var       x, y, z, a, b, c, d, t: integer ; begin       x : = 336;       y : = 8;       x : = x div y;       y : = x mod y;       writeln('x = ', x, ', y = ', y);             a : = 1686;       b : = (a div 10) mod 5;       a : = a - 200 * b;       writeln('a = ', a, ', b = ', b);             x : = 11;       y : = 5;       t : = y;       y : = x mod y;       x : = t;       y : = y + 2 * t;       writeln('x = ', x, ', y = ', y, ', t = ', t);             x : = 19;       y : = 3;       z : = y * 2;       y : = x mod y;       x : = x - z;       y : = y + z;       writeln('x = ', x, ', y = ', y, ', z = ', z);             x : = 13;       y : = 3;       z : = x;       x : = z div y;       y : = x;       writeln('x = ', x, ', y = ', y, ', z = ', z); end. вывод и ответы по очереди 1) x = 42, y = 2 2) a = 1086, b = 3 3) x = 5, y = 11, t = 5 4) x = 13, y = 7, z = 6 5) x = 4, y = 4, z = 13

Ответ в файле: : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : : :