Что? .... Можно на русском?
1) Презентация PowerPoint.pptx
2) 2,87 МБ (3 016 484 байт)
3) Мой компьютер - Локальный диск D - Презентации
4) 9/04/15
<span>easyQuizzy Программа что бы составлять тесты</span>
<span> Блок-схема суммы положительных и произведение четных членов данного массива</span>
Var
x0,xn,c:real;
x,y,xmax,ymax:real;
begin
writeln('Xнач, Xкон:');
readln(x0,xn);
write('С = '); readln(c);
x:=x0;
xmax:=x; ymax:=x*x-100*x+10;
repeat
x:=x+c;
y:=x*x-100*x+10;
if y>ymax then begin xmax:=x; ymax:=y; end;
until x>=xn;
writeln('xmax = ',xmax,' ymax = ',ymax);
end.
Пример:
Xнач, Xкон:
-10 20
С = 1
xmax = -10 ymax = 1110