1.
const n=5;
var
a: array[1..n] of integer;
i: integer;
begin
for i:=1 to n do
read(a[i]);
for i:=n downto 1 do
write(a[i], ' ');
end.
2.
const n=10;
var
a: array[1..n] of integer;
i: integer;
begin
for i:=1 to n do
read(a[i]);
for i:=1 to n do
if i mod 3 = 0 then
write(a[i], ' ');
end.
АБЕК
АБВЕК
АБВК
АВЕК
АВК
АГК
АДГК
АДЖК
Ответ: 8.
Опять похожая задача у тебя) Держи решение:
const m=?; {Вместо "?" нужно вписать любое число}
Var s:real;
Begin
s:=0;
for i:=2 to m do
if sin(i)<0 then s:=s+sin(i);
writeln(s);
End.
1) 128 = 2 i <span>, i = 7 </span>
2) V = K * i = 64 x 64 x 7 бит = 28672 Б = 28 КБ
Можно понять,по выражению его лица.Тоесть:Рот,брови,взгляд.