№1.Определите значение целочисленных переменных х и у после выполнения фрагмента...

Question

№1.Определите значение целочисленных переменных х и у после выполнения фрагмента программы: х:=136 у:=4; х:= х div y; у:= х mod y; №2.Определите значение целочисленных переменных х и у после выполнения фрагмента программы: а:=582; b:=(a div 10) mod 5; а:=а-15*b; Помогите пожалуйста,очень надо.Может быть в этом здесь кто-то разбирается)

Answer 1

Ответ:

Первое задание: x = 34; y = 2

Второе задание: a = 537; b = 3

Объяснение:

Вот программка:

var x, y, a, b: integer;

begin

 x:=136;

 y:=4;

 x:= x div y;

 y:= x mod y;

 writeln('Первое задание: x = ', x, '; y = ', y);

 writeln;

 a:=582;

 b:=(a div 10) mod 5;

 a:= a - 15 * b;

 writeln('Второе задание: a = ', a, '; b = ', b);

 readln

end.

Comments

Спасибо огромное,очень помогли)