Задание 1. Получив на вход натуральное число x (x > 100), программа печатает число M. Укажите значение M, при вводе чисел:
А) 52
Б) 36
С) 89
var x, L, M: integer;
begin
readln(x);
L := x;
M := 52;
while L <> M do​
if L > M then
L := L – M ​
else
M := M – L;
writeln(M)
end.

dasha1832    2   15.05.2020 07:15    4