Пишу ответ на С++ и QBasic, если у Вас другой язык, то просто измените синтаксис:
1) min=10000;
number=0;
for (int i=0;i<5;i++)<br>{
if A[i]{
min=a[i];
number = i;
}
}
2)
DECLARE FUNCTION f! (x!)
CLS INPUT "[A; B] = "; A, B
INPUT "SHAG H = "; n
FOR x = A TO B STEP n
n = n + 1
IF n MOD 20 = 0 THEN
PRINT "PRESS ENTER"
DO: LOOP UNTIL INKEY$ <> ""
CLS
ELSE
IF ABS(x) < 1 THEN
PRINT USING "X = ###.###"; x;
PRINT " Y = ---"
ELSE
PRINT USING "X = ###.### Y = ###.###"; x; f(x)
END IF
END IF
NEXT
END
FUNCTION f (x)
IF ABS(x) <= 3 THEN <br> IF ABS(x) >= -3 THEN f = x
ELSE
f = 1 / (x*x) END IF
END FUNCTION