Для начала необходимо перевести число 11 из 10-ной с.с в 2-ную с.с, из 10-ной с.с в 2-ную переводится путем деления числа на основание переводимой с.с (т.е на 2), мы делим 11 на 2,остается частное и остаток,сравниваем частное меньше делителя,если нет до делим снова на 2,делим на 2 до тех пор пока частное не станет меньше делителя,затем записываем ответ начинает с частного и всех последующих остатков!
затем складываем 2 числа в 2-ной с.с,по правилу 0+0=0; 0+1=1; 1+0=1; 1+1=10 (единица переносится в старший разряд)
E:\TOM3\Doc3
Мне кажется, что DOC3 - это просто отвлечение, т.к. папка не ведет к нужному файлу
<span>int main()
{
int array[3]={9,7,6},a;
int i;
for(i=0;i<3;i++) {
if(array[i]%3==0) {
a=array[i]; break;
}
}
printf("Hello, %d!\n",a);
return 0;
}</span>
Паскаль пишется как Pascal.
var
a, sum : integer;
begin
read (a);
sum := 0;
while (sum <= 10) and (a > 0) do
begin
sum := sum + a mod 10;
a := a div 10;
end;
if sum > 10 then write ('Yes') else write ('No');
end.
Var
a : array [1..100] of integer;
i, sum : integer;
begin
for i := 1 to 100 do read (a[i]);
sum := 0;
for i := 1 to 100 do sum := sum + a[i];
write (sum);
end.