program fantscrin;
const n = 11;
var a: array [1..n] of integer;
i,s,p: integer;
begin
for i: =1 to n do
a[i]: = random(8)+4;
for i: =1 to n do
write(a[i], ' ');
s: =0;
p: =1;
for i: =1 to n do
if (i mod 2 = 0) then p: =p*a[i]
else s: =s+a[i];
writeln('');
writeln('сумма = ',s);
writeln('произведение = ',p);
end.
Роботу з великою кількістю електронних листів від різних адресатів можна організувати ефективно. Доцільно скласти список людей, з якими ви постійно листуєтесь, та внести їх електронні адреси до адресної книги. Адресна книга призначена для зберігання на поштовому сервері різних відомостей про адресатів: адреси електронної пошти, домашні та службові адреси, номери телефонів і факсів тощо. У разі потреби можна внести на сторінку нотаток будь-які додаткові відомості.