Программа на основе цикла с предусловием

Блок-схема алгоритма программы на основе цикла с предусловием

Программирование вложенных циклов для вычисления таблицы значений функции

Результаты работы программы на основе цикла с постусловием

На рисунке 17 показан результат работы программы при x=5, eps=0.001:

Рисунок 17 - результат работы программы при x=5, eps=0.001

Задание №5

Вычислить таблицу значений функции z=f(x,y) в диапазоне значений аргумента x ϵ [-a;a], y ϵ [-a;a] с шагом h. Построить блок-схему алгоритма и написать программу на основе цикла с предусловием, цикла с постусловием и цикла с параметром.

Блок-схема алгоритма программы на основе цикла с предусловием показана на рисунке 18

Рисунок 18 - БСА для решения задания №5 на основе цикла с предусловием

Далее следует текст программы:

program kurs51;

uses crt;

var

x,y,h,z,a:real;

begin

clrscr;

writeln ('Enter a,h');

readln (a,h);

y:=-a;

while (y<=a+h/2) do

begin

x:=-a;

while (x<=a+h/2) do

begin

z:=5*x*x-2*y+1;

writeln ('x=',x:4:4, 'y=',y:4:4, 'z=',z:4:4);

x:=x+h;

end;

y:=y+h;

end;

end.