Глобальный-мировой, оч важный
Var a, b: integer;
begin
Writeln('Введите два числа');
Readln(a, b);
repeat
if a > b then a := a Mod b else
b := b Mod a;
until (a = 0) Or (b = 0);
writeln('НОД = ', a + b);
<span>end.</span>
Алгоритм месяца Начало
1.нарисовать линию
2.Затем оттянуть её( сделать полукругом
3. Взять снова эту линию и повторить то же самое
4.Выполнить заливку синим цветом
конец
Ну животные вроди как сигналы (звуки), жесты, друг другу подают, а растения передают информацию по наследству