Массивы

@bProgrammer · Регистрация: 20.11.2013

Author24 — интернет-сервис помощи студентам

Здравствуйте форумчане) Посмотрите пожалуйста лабораторку по ММУ(Модели и Методы Управления): дана таблица данных: 1)

Код

№        значения факторов
опыта      Х1	Х2	  У1	    У2	  У3
1	      50	1,1	 46.43	51.31	48.07
2	      71	1,15 51.09	47.87	52.91
3	      57	1,25 51.49	49.8	46.57
4	      64	1,05 48.14	49.9	53.21
5	      50	1,2	 49.05	45.93	50.77
6	      71	1,25 47.38	49.1	52.36
7	      57	1,2	 51.76	46.83	50

С помощью этих данных найти 2) Для каждой строки находится среднее значение по трем параллельным опытам
y1=1/m*(y1,1+y2,1+y3,1) до у7, m=3 . Паскаль.

@bProgrammer · 20.11.2013, 09:05 **[ТС]**

таблицу скопировала и не понятно получилось( посмотрите лучше вложенный док

Добавлено через 1 минуту
вот что я начала делать:

Pascal

program mmu;
uses crt;
const
D1:array[1..7] of string[7]=('x1,1','x1,2','x1,3','x1,4','x1,5','x1,6','x1,7');
S:array[1..7] of integer=(50,71,57,64,50,71,57);
D2:array[1..7] of string[7]=('x2,1','x2,2','x2,3','x2,4','x2,5','x2,6','x2,7');
S2:array[1..7] of real=(1.1,1.15,1.25,1.05,1.2,1.25,1.2);
y1:array[1..7] of string[7]=('y1,1','y1,2','y1,3','y1,4','y1,5','y1,6','y1,7');
S3:array[1..7] of real=(46.43,51.09,51.49,48.14,49.05,47.38,51.76);
y2:array[1..7] of string[7]=('y2,1','y2,2','y2,3','y2,4','y2,5','y2,6','y2,7');
S4:array[1..7] of real=(51.31,47.87,49.8,49.9,45.93,49.1,46.83);
y3:array[1..7] of string[7]=('y3,1','y3,2','y3,3','y3,4','y3,5','y3,6','y3,7');
S5:array[1..7] of real=(48.07,52.91,46.57,53.21,50.77,52.36,50);
var yi,i,m:integer;
begin
clrscr;
m:=3;

	20.11.2013, 09:05

Массивы

Решение