Значение переменной Х и соответствующие им значения Z выдавать на печать в виде таблицы

Лабораторная работа №4.

Тема: «Разработка, отладка и испытание простых циклических алгоритмов с неизвестным числом повторений».

Цель работы: составление программ на языке Pascal с использованием цикла WHILE.

ЗАДАНИЕ №2.

В соответствии со своим вариантом составить графическую схему алгоритма и написать программу для вычисления значений переменной Z по формуле, приведенной в таблице, для значений аргумента Х, изменяющегося в заданных пределах: от Х_нач. до Х_кон. с шагом Х.

Значение переменной Х и соответствующие им значения Z выдавать на печать в виде таблицы.

-20

Код программы

program lab4;

uses crt;

var

x,xn,xk,dx,z:real;

i:integer;

begin

clrscr;

writeln ('Введите xn,xk,dx');

readln (xn,xk,dx);

writeln ('':8,'Функция z');

writeln ('| x | z |');

for i:=1 to 27 do

write ('-'); writeln;

x:=xn;

while x<=xk do

begin

if x>5 then

z:=sqrt(ln(2*x)+cos(x/3))

else

if x<=-2 then

z:=3*sqr(x)+exp(2*x)

else

z:=sin(x)+sqr(cos(x));

writeln ('|',x:10:3,'|',z:10:3,' |');

x:=x+dx

end;

for i:=1 to 27 do

write ('-');

end.

Нет

Да Нет

Да Нет