Uses Crt;
const n=10;
var
A: array[1..n] of integer;
i,f,f1: integer;
begin
clrscr;
f:=-1;
f1:=-1;
for i:=1 to n do
begin
writeln('введите',i,' элемент массива ');
readln (A[i]);
if A[i]>0 then
begin
f1:=A[i];
if f<0 then
f:=A[i];
if f>f1 then
f:=A[i];
end;
end;
writeln('наименьшее положительное', f);
readln;
end.
Програ́ммное обеспе́чение <span>(допустимо также произношение </span>обеспече́ние (ПО) — программа или множество программ, используемых для управления компьютером<span>.</span>
По курсу валют
Долларов р:55.65
Евро р:69.45
Кол-во вариаций = 2^i, где i - кол-во бит для кодировки одного символа.
129 = 2^i. i лежит между 7 и 8, но так как 2^7 < 129, ответ 8.
Один символ кодируется 8 битами или 1 байтом :)