Переменная "proizv" - это произведение, а "summa" - сумма. Я сделал так, чтобы выводились все эти 20 нечётных чисел, для удобства, но если не надо, то просто стирайте всю строку №14 (начиная считать от "program asd_;"). program asd_; uses crt; var i, b, summa : integer; proizv : real; a : array [1..20] of integer; BEGIN clrscr; b:=1; summa:=0; proizv:=1; for i:=1 to 20 do begin a[i]:=b; b:=b+2; writeln(a[i]); end; for i:=1 to 20 do summa:=summa+a[i]; for i:=1 to 20 do proizv:=proizv*a[i]; writeln('summa=',summa); writeln('proizvedenie=',proizv); END.
Формальные исполнители, то есть те, которые не понимают смысла алгоритма, а лишь выполняют указанные шаги и не могут их редактировать: собака, не понимающая смысл команд, телевизор, в общем - любые неодушевлённые исполнители. Неформальные - те, что понимают смысл алгоритма и могут вносить в него коррективы - скажем, человек. Управление - процесс планирования организации мотивации и контроля,для достижения определённой цели. Алгоритм-набор инструкций описывающий порядок действий исполнителя для достижения результата решения задачи за конечное число действий.
program asd_;
uses crt;
var i, b, summa : integer;
proizv : real;
a : array [1..20] of integer;
BEGIN
clrscr;
b:=1;
summa:=0;
proizv:=1;
for i:=1 to 20 do begin
a[i]:=b;
b:=b+2;
writeln(a[i]);
end;
for i:=1 to 20 do summa:=summa+a[i];
for i:=1 to 20 do proizv:=proizv*a[i];
writeln('summa=',summa);
writeln('proizvedenie=',proizv);
END.