формула начинается со знака =
1 а 2 б 3 ф 4 ф 5 г 6 а 7 а и в 8 а 9 в 10 не знаюю
В Form1 , создаете 7 объектов, (Edit1,Edit2,Edit3,Label1,Label2,Label3,Button1),2 кликк по кнопке (button1)
в созданную процедуру вставляйте код:
procedure TForm1.Button1Click(Sender: TObject);var a,b:integer;begin a:=StrToInt(Edit1.Text); b:=StrToInt(Edit2.Text); Edit3.Text:= IntToStr((a+b)*2)end;
N=7,
1 4 6 7 9 12 17
1)среднее арифметическое = (1+4+6+7+9+12+17)/7 = 8
2)<span>среднее геометрическое = корень седьмой степени из(1*4*6*7*9*12*17)=</span>6.08
3)<span>среднее гармоническое = 7/(1/1+1/4+1/6+1/7+1/9+1/12+1/17) = 3.857</span>