я сделал рандомные числа от 0 до 100, если нужно можешь изменить, что бы заполнялся пользователем.
a[10],i,min,s,p:integer
randomize
for i=1 to 10 do
a[i]:=random(101);
min:=a[i];
s:=0
p:=1
for i=1 to 10 do begin
if a[i]<min then
min:=a[i];
if a[i]<0 then
s:=s+a[i];
if a[i] mod 3 = 0 then
p:=p*a[i];
end;
write('minimum=', min, ' summ=', s, ' umnosenie=', p);
end.
1) 1*2^6+1*2^5+0*2^4+0*2^3+1*2^2+1*2^1+0*2^0=64+32+0+0+4+2+0=102
2)012 = 0∙21+1∙20 = 0+1 = 110
Вторая схема, так как АЕ = 1; ЕС=2 и так далее. В первом графике эти данные не совпадают.
Если вы про имя, то у меня любое
хоть и такое:
<span>\ ⁄ ? : * " > < |
ОС: Linux
получается создать файл с \
если у кого стоит бубунту, то не нужно тут причитать, мол файл такой невозможен
максимальная длина - </span><span>???????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????
Дистрибутив: Mageia</span>