Скину на карту 100 рубасов, надо решить в exel работу

1. дана функция y=5sin(x+1 )-4cos(3x-1 )+6 . построить таблицу значений и график функции на интервале [-6.3; 6.7]. ответить на вопросы:

а) значение функции в точке х=-2,3;

б) количество максимумов функции на данном интервале.

2. для обработки полей на i га требуется 135 кг азотных удобрений по цене 789руб/тонна, 76 кг калийных по цене 1239 руб./тонна, 43 кг фосфорных по цене 1523 руб./тонна, 1.5 кг гербицида по цене 355 руб./кг,0,3 кг инсектицидов по цене 890 руб./кг. фермер планирует потратить 5 рублей. определить:

а) сколько гектаров земли может быть обработано;

б) сколько денег требуется для гербицидов.

файл, правка, вид, вставка, формат, сервис, таблица, окно, справка.

на выходе 109

program p_1; var x,y: real; beginwriteln ('vvedite x'); readln(x); writeln ('vvedite y'); readln(y) ; if x=1 then y: =3; {на всякий случай, мало ли по клавише тне никак не можно ставить другие значения. эту строчку можно и }x: =y-x; y: =2*x; x: =2*y+x; y: =y+x/2; writeln(x,'',y); readln; end.

var

i: integer;

s: real;

m: array[1..2,1..6] of real;

begin

s: =0;

for i: =1 to 6 do

begin

readln(m[1,i]);

readln(m[2,i]);

s: =s+3.14*m[1,i]*m[1,i]*m[2,i]*1200;

end;

writeln(s);

end.

я бы сделал

program p_1; var a,b: real; beginwriteln ('vvedite 1-oe'); read (a); writeln ('vvedite 2-oe'); read (b); if (a> b) thenbegin writeln ( ' 1-oe bolshe (',a,')' ); end; if (a< b) thenbegin writeln ( ' 1-oe menshee. bolshe vtoroe (',b,')' ); end; if a=b thenbegin writeln ('oni ravni'); end; end.