40 элементов массива найти сумму отрицательных элементов кратных 5
For i:=1 to 40 do begin
if (a[i]<0) and (a[i] mod 5 =0) then k:=k+a[i];
end;
writeln;
write(сумма ,k);
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
