37 mod 10 решите пожалуйста

необходимо________________

3)Чтобы нарисовать прямоугольник, необходимо_____________

4)Чтобы нарисовать квадратк, необходимо_____________

5)Чтобы нарисовать овал, необходимо_____________

6)Чтобы нарисовать круг, необходимо_____________

Помогите пожалуйста!

Нужно перевести в двоичную систему
29 и 39
47 и 33
61 и 75
и можно кратко объяснить как вообще делать?

mod 10

s:=a+b+c.

Чем является результат S этого алгоритма?

c:=x mod 10

s:=a+b+с.

Чем является результат s этого алгоритма?

2) Определите значение целочисленных переменных x и

y после выполнения фрагмента алгоритма.

x:=336

У:=8

x:=x div y

y:=х mod у

С помощью операции div вычисляется целое частное, с помощью операции mod - остаток.

c:=125 mod 10

печатает сначала 3, а потом 10.
var x, L, M: integer;
begin
readln(x);
L:=0; M:=0;
while x > 0 do begin
L:=L+1;
if M < x then begin
M:= (x mod 10) * 2;
end;
x:= x div 10;
end;
writeln(L); write(M);
end.
И объясните пожалуйста