больше всего подходит f4
program znanija_com_task_32583491;
var proizv: real;
i: integer;
function y(a: integer): real;
begin
y: =(2*a+7)/(3*a-2)
end; {function y}
begin
proizv: =y(6)*y(7);
for i: =7 to 18 do
begin
proizv: =proizv*y(i);
end; {for i}
write('proizvedenie mnozhestva znachenij funkcii y = ',proizv)
end.
{
как я понял , во-первых, функция это дробь с числителем 2a+7, а знаменатель 3а-2. если всё-таки дробный коэффициент перед вторым слагаемым это легко меняется в теле функции.
также, мне кажется, что счетчик цикла 7..18 - это 1. то есть, только функция от натурального аргуента. в принципе тоже легко меняется уже в главной программе.
а дальше уже произведение рассчет самого главного: y(6) * y(7) * y(7) * y(8) * * y(16).
}
var a: array [1..100] of integer;
i,max,min: integer;
begin
for i: = 1 to 100 do
begin
a[i]: = random(50)-25;
write(a[i]: 5);
end;
min: = a[1];
max: = a[1];
for i: = 1 to 100 do
begin
if a[i] > max then max: =a[i];
end;
for i: = 1 to 100 do
begin
if a[i] < min then min: =a[i];
end;
writeln;
writeln('min = ',min);
writeln('max = ',max);
writeln('min + max = ',min + max);
end.
Поделитесь своими знаниями, ответьте на вопрос:
f2 это точно незнаю