Добавил:
Tushkan
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Лабораторные работы / Машеров (13 вариант) / lab4 / creatingS
.txt for i:=1 to 50 do
begin
sum := 0;
for j:=1 to 10 do
sum := sum + (data(i, j)-data(i,11))^2;
data(i,12) := sqrt(sum / 9);
end
begin
sum := 0;
for j:=1 to 10 do
sum := sum + (data(i, j)-data(i,11))^2;
data(i,12) := sqrt(sum / 9);
end
Соседние файлы в папке lab4