На картинке вопрос!!!!!!!!!!!!!!

Пишу ответ на С++ и QBasic, если у Вас другой язык, то просто измените синтаксис:
1) min=10000;
number=0;
for (int i=0;ilt;5;i++)
{
if A[i]lt;min;
{
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$ lt;gt; ""       
CLS    
ELSE       
IF ABS(x) lt; 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) lt;= 3 THEN     
  IF ABS(x) gt;= -3 THEN f = x   
 ELSE    
   f = 1 / (x*x)   END IF 
END FUNCTION