55

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

23 марта 2023

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

категория: информатика

96

Program Pr; var x,y,z: real; i: integer; Beginy: =-1; x: =-pi; For i: =1 to 7 do beginz: =x*x+y+sin (x); if (x<>0) then x: =x+(pi/6); if i=6 then x: =0; if y<>1 then y: =y+0,4; writeln ('z=',z: 4:4); end; end.

Знаете ответ?

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