Регистрация
Войти
Стать экспертом Правила
Информатика

Составить программу в TURBO PASCAL 7.0, в которой с помощью оператора REPEAT необходимо протабулировать функцию y = cos(x/3+0.3) в диапазоне параметра от 0 до 6 с шагом 0.2
Буду очень благодарен за решение,спасибо за внимание.

ОТВЕТЫ
Var  x: Real;
begin
x:=-0.2;
while xlt;=6 do begin
 x:=x+0.2;
 Writeln(X=,x:2:1,   Y=,cos(x/3+0.3):5:2);
 end;
end.
212
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам