для x1=0,3 и x2=-0,3

[Arinaeros]

Используя цикл FOR для x1=0,3 и x2=-0,3 найти xk=k+sin(xk-2) для k,изменяющегося следующим образом:k=3,4...,14

[macomics]

uses SysUtils, Math;
var x, y, t: Double; k: LongInt;
begin x := 0.3; y := -0.3; Write(x, ' ', y, ' '); for k := 3 to 14 do begin t := x; x := y; y := k + sin(t); Write(y, ' '); end; WriteLn(); end;