Написать на питоне. На вход подаётся число N, а затем N пар чисел (числа в паре через пробел, одна строка – одна пара). Вывести НОД каждой пары. Вычисление НОД двух чисел организовать через функцию.
Пример ввода:
5
10 15
49 70
50 150
1024 320
154 155
Пример вывода:
5
7
50
64
1​

юра из новгородатоля из москвы

алеша из томска

коля из перми

витя из санкт-петербурга 

program xxx;

var a,s : string;

    i: integer;

begin

    writeln ('введите слово и символ-');

    readln (s,a);

    for i: =1 to length(a) do

        if copy (s,i,1)=a then writeln (i);

    readln

end.

var

  n: integer;

begin

  readln(n);

  writeln(abs(n)-2);

end.

program ssd;

  uses crt,graph;

  var       d,m: integer;

  begin

  clrscr;

  initgraph(d,m,'');

  arc(200,200,360,180,50);

  line(150,200,250,200);

  readkey; closegraph;

  end.