Добро времени суток уважаемые знатоки.

сделать блок-схему для программы.

заранее .

код программы( delphi)

unit unit1;

interface

uses

winapi.windows, winapi.messages, system.sysutils, system.variants, system.classes, vcl.graphics,

vcl.controls, vcl.forms, vcl.dialogs, vcl.stdctrls, math;

type

tform1 = class(tform)

label1: tlabel;

aedit: tedit;

a: tlabel;

bedit: tedit;

b: tlabel;

cedit: tedit;

c: tlabel;

zedit: tedit;

z: tlabel;

button1: tbutton;

memo1: tmemo;

procedure button1click(sender: tobject);

private

{ private declarations }

public

{ public declarations }

end;

var

form1: tform1;

implementation

{$r *.dfm}

procedure tform1.button1click(sender: tobject);

type mas=array[1..15] of real;

var m: mas;

var i,count_c: integer;

var a,b,c,result: real;

begin

memo1.clear;

aedit.clear;

bedit.clear;

cedit.clear;

zedit.clear;

for i: =1 to 15 do

begin

m[i]: =strtofloat(inputbox('окно ввода',

'элементы массива','0'));

memo1.lines.add(floattostr(;

end;

a : = 1;

b : = m[1];

c : = 1;

count_c : = 0;

for i: = 1 to 15 do

begin

if(m[i] < 0) then a : = a * m[i];

if (b < abs( then b: = abs(m[i]);

if(m[i] > 0) then

begin

c: = c * m[i];

count_c : = count_c + 1;

end;

end;

c: = power(c, (1/count_c));

result : = (a*b)/(c + 2.11);

aedit.text: =floattostr(a);

bedit.text: = floattostr(b);

cedit.text: = floattostr(c);

zedit.text: = floattostr(result);

end;

end.

Word 2007

В Microsoft Office Word 2007 отформатировать таблицу после ее создания можно несколькими Применение стилей таблиц позволяет задать формат сразу для всей таблицы, а также выполнить предварительный просмотр, чтобы заранее увидеть, как будет выглядеть таблица с выбранным стилем форматирования.

Таблицы можно изменять путем разбиения или объединения ячеек, добавления и удаления столбцов и строк, а также рисования. При работе с большими таблицами можно задать отображение заголовка таблицы на каждой из страниц, на которых она выводится. Чтобы исключить непредусмотренные разрывы потока данных в таблице, можно указать, в каких местах должны находиться разрывы страницы.

Объяснение:

вроде так

Цикл с предусловием — цикл, который выполняется пока истинно некоторое условие, указанное перед его началом. Это условие проверяется до выполнения тела цикла, поэтому тело может быть не выполнено ни разу (если условие с самого начала ложно)

Цикл называется итерационным, если число его повторений  не задается, а определяется в ходе выполнения цикла. В этом случае одно повторение цикла называется итерацией.

Цикл, в котором условие записано после тела цикла, выполнится как минимум 1 раз, а потом начнет проверять условие цикла. Цикл с предусловием может не выполниться ни разу, так как условие проверяется сразу. Цикл с предусловием используется когда у нас есть четкие границы выполнения.

Объяснение: