кто разбирается в Паскаль Программист написал программу, вычисляющую сумму элементов массива A, десятичная запись которых заканчивается на 5. Какое условие он записал вместо многоточия?
В ответе запишите только пропущенное условие.

s := 0;
for i := 1 to n do begin
if … then
s:= s + A[i]
end;

s := 0;

For i := 1 to n do begin

if a[i] mod 2 = 5 then

s:= s + a[i];

end; //часть программы, вычисляющая сумму элементов массива, запись которых заканчивается на 5

1)

program m; uses crt; var i,a,b,c,min: integer; beginclrscr; readln(a,b,c);

if a< min then min: =a; if b< min then min: =b; if c< min then min: =c; writeln('              ',min); readkey; end.

2)

program m; uses crt; var i,a,b,c,min,d: integer; beginclrscr; readln(a); min: =a; for i: =1 to 2 do                       

                                                                beginreadln(a); if a< min then min: =a;                                                             end; writeln(min);

readkey;

end.

3)

program m; uses crt; var i,a,b,c,min,d: integer; beginclrscr; readln(a,b,c); if a< b then b: =a; if c< a then b: =c; writeln(b); readkey; end.