Сначала переведем 111100₂ и 14₈ в десятичную систему:
111100₂ = 1∙2⁵+1∙2⁴+1∙2³+1∙2²+0∙2¹+0∙2⁰ = 32+16+8+4+0+0 = 60₁₀
14₈ = 1∙8¹+4∙8⁰ = 8+4 = 12₁₀
Получается в группе 60% девочек и 12 мальчиков.
12 мальчиков = 40%.
Найдем общее кол-во человек в группе: 12/40*100 = 30 человек.
Из них 30 - 12 = 18 девочек.
var n,z,n1,e:integer;
begin
e:=0;
readln(n);
n1:=n div 2;
for z:=1 to n1 do begin
if (n mod z = 0) then e:=e+z;
end;
if (e=n)
then writeln('соверншенное')
else writeln('0');
end.
Если одномерный массив, то:
program min;
var a:array[1..10] of integer;
i,min,k:integer;
begin
writeln('Введите элементы массива');
for i:=1 to 10 do
readln(a[i]);
min:=a{1];
for i:=1 to 10 do
if a{i]<min
then min:=a{i};
for i:=1 to 10 do
if a{i]=min
then k:=k+1;
writeln('Всего элементов с минимальным значением =',k);
end.
Какая по счету буква такая и цифра а -1,б-2 и т.д.