написать программу,вычисления в ПАСКАЛЕ , ПОМОГИТЕ ПОЖАЛУЙСТА! Вывести на печать значения

Написать программку,вычисления в ПАСКАЛЕ , ПОМОГИТЕ ПОЖАЛУЙСТА!
Вывести на печать значения функции z=x+y+sin(x) при изменении

х от до
0, с шагом /6, и при
изменении y от 1 до 1
с шагом 0,4.

Задать свой вопрос
1 ответ
 Program Pr;
var x,y,z:real;
i:integer;
Begin
y:=-1;
x:=-pi;
For i:=1 to 7 do begin
z:=x*x+y+sin(x);
if (xlt;gt;0) then x:=x+(pi/6);
if i=6 then x:=0;
if ylt;gt;1 then y:=y+0.4;
writeln('z=',z:4:4);
end;
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт