512кб=512×1024×8бит=4194304бит
4194304/(512×1024)=8бит
N=2^8=256 символов
Program z;
Uses crt;
Var a,n,i,sum, pro:integer;
Begin
Sum:=0;
Pro:=1;
Writeln ('введите число a'); read (a);
Writeln('введите число n(>a)'); read (n);
For i:= a to n do
Begin
If odd(i) then
Begin
Sum:= sum+i;
Pro:= pro*i;
End;
End;
Writeln('sum=', sum);
Writeln('pro=', pro);
End.
Внешний накопитель ( он же повербанк) является ,, переносной зарядкой". Его часто используют, если отправляются в путешествие туда, где нет розеток, например в поход в лес.
Но и количество запасённой энергии бывает разным, это зависит и от размера внешнего накопителя.
Program n1;
const n=13;
var a: array [1..n] of integer;
i,sum:integer;
begin
randomize;
sum:=0;
write('исходный массив: ');
for i:=1 to n do
begin
a[i]:=random(50);
write(a[i],' ');
if a[i]*4>a[i]*a[i] then sum:=sum+a[i];
end;
writeln;
write('искомая сумма: ',sum);
end.