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

Слайд 2

Пример 4.1 Написать программу, которая для заданного целого числа печатает следующую

Пример 4.1 Написать программу, которая для заданного целого числа печатает следующую

таблицу

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. Объяснить работу программы. Построить структурную схему программы.

Слайд 3

Пример 4.2 Вычислить выражение z = ab/c +c/ab при заданных значениях

Пример 4.2 Вычислить выражение z = ab/c +c/ab при заданных значениях

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. Объяснить работу програм-мы. Построить структурную схему программы.