Получить ответ

Валентина Если еще нужно, напишите в ЛС 13.05.12

Валентина program tabul; uses crt; var x,y:real; max,min:real; begin clrscr; writeln('x':10,'y':10);  x:=0.6; max:=sin(x/3)-1; min:=max;  while x<=28 do begin   y:=sin(x/3)-1;   writeln(x:10:2,y:10:2);   if y>=max then max:=y;   if y<=min then min:=y;    x:=x+0.2; end;  writeln('max=',max:10:2);  writeln('min=',min:10:2);   readln end.  13.05.12

Еva от 100 p. 4.9 399 отзывов Рейтинг: 121 998 6-й в Учебе и науке Общаться в чате Читать ответы

Похожие вопросы