Напечатать таблицу значений функций

@Alexey0017 · Регистрация: 02.11.2012

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

Напечатать таблицу значений функций sin х и cos х на отрезке [0,1] с шагом 0.1 в следующем виде (считать, что при печати на каждое вещественное число отводится по 6 позиций строки):
х sin(x) cos(x)
0.0000 0.0000 1.0000
0.1000 0.0998 0.9950
……………………….…….
1.0000 0.8415 0.5403

Пожалуйста помогите

@CodeR · 07.12.2012, 07:57

Pascal

Const a=0;b=1;h=0.1;
      l='------------------------';
Var x:real;
Begin
    writeln(l);
    writeln('   x   | ','sin(x) | ','cos(x)');
    writeln(l);
    x:=a;
    While x<=b do
    Begin
      writeln(x:6:5,'|':1,sin(x):6:5,'|':2,cos(x):6:5);
      x:=x+h;
    End;
    writeln(l);
    readln;
End.

@Alexey0017 · 07.12.2012, 08:10 **[ТС]**

spasibo)

@Alexey0017 1 / 1 / 0 Регистрация: 02.11.2012 Сообщений: 14
		1
	Напечатать таблицу значений функций 07.12.2012, 06:47. Показов 1117. Ответов 2 Метки нет (Все метки) Напечатать таблицу значений функций sin х и cos х на отрезке [0,1] с шагом 0.1 в следующем виде (считать, что при печати на каждое вещественное число отводится по 6 позиций строки): х sin(x) cos(x) 0.0000 0.0000 1.0000 0.1000 0.0998 0.9950 ……………………….……. 1.0000 0.8415 0.5403 Пожалуйста помогите 0

@Alexey0017 1 / 1 / 0 Регистрация: 02.11.2012 Сообщений: 14
	07.12.2012, 08:10 [ТС]	3
	spasibo) 0

Опции темы

Напечатать таблицу значений функций

Решение