Работа в среде Турбо Паскаль. Чтение и составление программ линейных вычислительных процессов.

программ линейных вычислительных процессов.

печатает следующую таблицу
Program TABLIZA_1;

{programma postroenija tablizi}
var a, a3, a6:integer; {a3=a^3, a6=a^6=(a^3)^2}
begin
writeln('vvedite a');
read(a);
a3:=a*a*a; a6:=sqr(a3);
writeln('Tabliza treugolnaja');
writeln(a:4);writeln(a3:4,a6:4);writeln(a6:4,a3:4,a:4)
end. {rezultat Alt+F5}
Построить таблицы при а=1, 2. Объяснить работу программы. Построить структурную схему программы.

значениях a, b, c.

Program LIN_1; {vitschislit z:=(a*b/c)+(c/(a*b))}
var z,a,b,c:real;
begin
writeln('vvedite tschisla a, b, c');
read(a,b,c);
z:=(a*b/c)+(c/(a*b));
writeln('z=',z:8:2)
end.
Вычислить z при а = 5, b = 17, c = 7. Объяснить работу програм-мы. Построить структурную схему программы.

в интервале

Х[-2,+2] для целых значений Х, если a=5, b=4, c=1.

Program LIN_2;
var
a,b,c,x,y:integer;
begin
writeln('vvedite znatschenie X');
read(x);
a:=5; b:=4; c:=1;
y:=a*sqr(x)+b*x+c;
writeln('x=',x,',','y=',y)
end.
Объяснить работу программы. Построить структурную схему программы.