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

@OSIRIS · Регистрация: 30.12.2011

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

@Puporev · 29.11.2012, 12:16

Pascal

uses crt;
const n=20;
var x:array[1..n] of real;
    i:byte;
begin
clrscr;
write('x[1]=');
readln(x[1]);
writeln('Вектор:');
for i:=1 to n do
 begin
  if i>1 then x[i]:=sin(x[i-1])/2+sqr(cos(x[i-1]))/(3*abs(x[i-1]));
  write(x[i]:8:4);
 end;
readln
end.

@OSIRIS 0 / 0 / 0 Регистрация: 30.12.2011 Сообщений: 13
		1
	Составить программу для вычисления элементов вектора X по формуле 29.11.2012, 11:55. Показов 1585. Ответов 1 Метки нет (Все метки) __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы

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

Решение