Дана блок-схема алгоритма
определить результат выполнения алгоритма при определённых значениях исходных данных
например, при n=4 или n=1
1) ввод: n=4
s=0
k=4
проверка условия k> 2 ю «да» ю s=0+4=4; n=4-1=3
проверка условия k> 2 ю «да» ю s=4+3=7; n=3-1=2
проверка условия k> 2 ю «нет» ю вывод s=7
2) ввод: n=1
s=0
k=1
проверка условия k> 2 ю «нет» ю вывод s=0
Объяснение:
1.
// описание функции, ее можно менять
function func(in_x:real):real;
begin
func:=-2*in_x*in_x*in_x*in_x*in_x + 4;
end;
var
h:real;
x:real;
a, b:real;
count_otr:integer;
begin
writeln('Input a = ');
readln(a);
writeln('Input b = ');
readln(b);
writeln('Input h = ');
readln(h);
count_otr:=0;
x:=a;
while (x <= b) do begin
{writeln('x = ', x:3:3, ' f = ', func(x));}
if (func(x)<0) then count_otr:=count_otr + 1;
x:=x+h;
end;
writeln(count_otr);
readln;
end.
2.
function func(in_x:real):real;
begin
func:=-2*in_x*in_x*in_x*in_x*in_x + 4;
end;
var
h:real;
x:real;
a, b:real;
f_min, x_min:real;
begin
writeln('Input a = ');
readln(a);
writeln('Input b = ');
readln(b);
writeln('Input h = ');
readln(h);
x_min:=a;
f_min:=func(a);
x:=a+h;
while (x <= b) do begin
{writeln('x = ', x:3:3, ' f = ', func(x));}
if (func(x)<f_min) then x_min:=x;
x:=x+h;
end;
writeln('x min = ', x_min:3:3, ', f min = ', func(x_min):3:3);
readln;
end.
Поскольку вы не написали на каком языке должна быть программа, я напишу псевдокодом с комментариями.
var sum = getString("dividents.txt"); //изначально текстовый тип данных, первая строка в файле
var content; //переменная в которую будут помещаться строки файла поочерёдно
var count;//счётчик строк
var nowInv = [ ];//массив для разделения значений имени и процента инвестора
while(content = getString(''dividents.txt'')){//заполнение count
count++;
if(count >= 2){//если считывается после первой строки
nowInv = content.split("-");//разделение
writeln(nowInv[0], ": ", (int)sum/100*nowInv[1]);
}
}