Вычислить значение функции, используя условную операцию «? : »

// pascalabc.net 3.0, сборка 1164 от 11.02.2016 function gcd(a,b: integer): integer; // нахождение нод var   i: longint; begin   while b < > 0 do begin       a : = a mod b;       i : = b; b : = a; a : = i       end;   result: =a end; begin   var a: =readinteger('a=');   var b: =readinteger('b=');   var nod: =gcd(a,b);   if nod> 1 then       writelnformat('дробь сократима: {0}/{1}={2}/{3}',       a,b,a div nod,b div nod)   else writelnformat('дробь {0}/{1} несократима',a,b) end. тестовое решение: a= 23541 b= 335160 дробь сократима: 23541/335160=59/840

1. 2 массивы объявляются тем же оператором, что и обычные переменные 2. не корректный вопрос: индекс - это способ обращения к определенному элементу массива, а у самого массива индекса нет. в вариантах ответа ничего похожего на это нет. 3. 4 массивы заполняются теми же операторами, что и обычные переменные 4. 1 есть такой способ ввода в бейсике - конструкция read data 5. 1 выведется четвертый элемент массива, т.к. нумерация идет с нуля, и первый имеет номер 0, второй - 1, третий - 2, а четвертый - номер 3, который и запрашивается в выражении  а(3)