30 спортсменов участвовали в велокроссе специаьное устррйство регистрирует прохожление каждым из участников промедутрчнргр финишас испоотщованмем минимального кооичества бит какой обьем​

Если я правильно поняла смысл задачи, то нужно найти такое минимальное натуральное n, при котором указанные значения a и b были бы целыми числами. Тогда могу предложить такой вариант решения:

Составим для х и у уравнения пути чертежника, при котором он возвращается в исходную точку (система уравнений):
1) для х: 52+n*(15+a)-17=0,
2) для y: -7+n*(22+b)-35=0.

Выразим в обоих уравнениях a и b через n :
1) a=-35/n-15
2) b=42/n-22

Теперь, чтобы a и b оказались целыми числами, мы должны найти число, на которое 35 и 42 делятся без остатка, то есть НОД.
Итак, n = НОД(35 и 42) = 7.
=>

1) a = -35/7-15 = -20
2) b = 42/7-22 = -16

ответ: n=7

1.

program n1;

var

k, s: integer;

a: array [1..8] of integer;

begin

for k := 1 to 8 do readln(a[k]);  // с клавиатуры вводится массив из 8

s := 0;                                           элементов

for k := 1 to 8 do

if a[k] < 0 then s := s + a[1];  // в цикле 4 раза к s прибавляют 1-ый элемент

writeln(s);                             // выводится s

end.

ответ: 4(т.к 1-ый элемент массива 1 и в нём 4 отрицательных элемента)

2.  

Надо строку if a[k] < 0 then s := s + a[1];

Заменить на строку if a[k] < 0 then s := s + a[k];

Объяснение: