Практическая работа №6 (9 класс)

1. Определить какие компоненты нужно разместить на форме исходя из кода, который, ниже.
2. Ввести ещё две переменные для  Суммы и для Среднего значения.
3. Изменить количество табличных значений
4. Написать формулу для нахождения суммы значений
5. Написать формулу для нахождения среднего значения
6. Вывести Среднее значение в поле МЕМО2.

var a: array [0..9] of real; i: integer; 
begin
for i:=0 to 9 do
a[i]:=StrToFloat(Memo1.Lines[i]);
for i:=0 to 9 do
a[i]:=a[i]*a[i];
Memo2.Clear;
for i:= 0 to 9 do
Memo2.Lines.Append(FloatToStr(a[i]));
end;