Масштаб ответа зависит не от количества пустых словечек, а от максимально-допустимого удовольствия им охватываемой пустоты.
Ответ: 135(10) = 207(8), фото ниже.
Const n=20;
var a:array [1..n] of integer;
s,i:integer;
begin
writeln('Исходный массив:');
for i:=1 to n do
begin
a[i]:=random(90);
write(a[i],' ');
end;
writeln;
s:=0;
for i:=1 to n do
if (a[i] mod 2 <> 0)and(a[i] mod 3 = 0) then s:=s+a[i];
writeln('s=',s);
end.
Пример:
Исходный массив:
66 14 74 6 15 65 42 37 34 0 63 75 69 17 50 15 78 14 7 35
s=237
Var i: char;
n: integer;
a: array [0..21] of char;
begin
readln(n);
for i := 'a' to 'z' do if (ord(i) <= n + 97) then write(i);
<span>end.</span>
1) посчитаем количество квартир в подъезде 1953-(1737-1)=217
количество подъездов 1953/217=9
2) ряд задается формулой a [i+1]=a [i]+3^I
считаем ряд дальше 26+81=107
107+343=450
450+1029=1479
3)
Б О Р И С
50 67 95 32 48