Составить программу для вычисления элементов вектора X по формуле

@ваня37 · Регистрация: 17.11.2012

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

Составить программу для вычисления элементов вектора X по формуле xk = Название: 22.png
Просмотров: 132

Размер: 1.4 Кб

, k = 3, 4, ... , 12

@CodeR · 25.11.2012, 08:32

Pascal

1 2	For k:=3 to 12 do X[k]:=sqrt(sqrt(abs(x[k-1])))/(sin(x[k-1])/cos(x[k-1]))+sqr(sin(x[k-1]));

@Puporev · 25.11.2012, 13:41

Посмотри и поправь.
Вычислить элементы вектора х

@ваня37 · 25.11.2012, 18:35 **[ТС]**

Pascal

program lab7_10;
uses crt;
const nmax=12;
var x:array[1..nmax] of real;
    k:integer;
begin
repeat
write('Размер массива от 3 до 12 k=');
read(k);
until k in [3..nmax];
writeln('Введите 2 первых элемента массива:');
read(x[1],x[2]);
For k:=3 to 12 do
 X[k]:=sqrt(sqrt(abs(x[k-1])))/(sin(x[k-1])/cos(x[k-1]))+sqr(sin(x[k-1]));
clrscr;
writeln('Исходный массив:');
for k:=1 to 12 do
write(x[k]:8:3);
end.

правильно ли я сделал?

Составить программу для вычисления элементов вектора X по формуле

@ваня37 · 25.11.2012, 23:07 **[ТС]**

мне бы полную программу ))

@ваня37 0 / 0 / 1 Регистрация: 17.11.2012 Сообщений: 17
		1
	Составить программу для вычисления элементов вектора X по формуле 25.11.2012, 00:59. Показов 2035. Ответов 4 Метки нет (Все метки) Составить программу для вычисления элементов вектора X по формуле xk = , k = 3, 4, ... , 12 0

@Puporev Почетный модератор 64288 / 47587 / 32739 Регистрация: 18.05.2008 Сообщений: 115,182
	25.11.2012, 13:41	3
	Посмотри и поправь. Вычислить элементы вектора х 0

@ваня37 0 / 0 / 1 Регистрация: 17.11.2012 Сообщений: 17
	25.11.2012, 23:07 [ТС]	5
	мне бы полную программу )) 0

Опции темы