1) дан массив а(6). найти минимальный элемент массива и его порядковый номер. 2) составьте алгоритм и программу вычисления значений функции на произвольном отрезке с произвольным шагом: y =  x - при -3 < x < = 3; y = 1 / x2 - в остальных случаях.

144

272

Посмотреть ответы 2

Ответы на вопрос:

Гектор31

Информатика

4,7(63 оценок)

1) program t1; var a: array[1..6] of integer; i, m, mi: integer; begin writeln('ввод массива'); for i : = 1 to 6 do readln(a[i]); mi : = 1; m : = a[mi]; for i : = 2 to 6 do if a[i] < m then begin mi : = i; m : = a[mi]; end; writeln('минимум: ', m, ' (a[', mi, '])'); end. 2) предполагая, что 'коробочка' - это корень program t2; const f = -8; t = 6; s = 2; var i: real; function gety(x: real): real; begin if (x > -3) and (x < = 3) then gety : = sqrt(x) else gety : = 1 / (x * x); end; begin writeln('промежуток [', f, '; ', t, '], шаг ', s, ': '); i : = f; while i < = t do begin writeln('y(', i, ') = ', gety(i)); i : = i + s; end; end.