1.35-16=19-не посещают кружки
2.19-17=2 -посещают биологию
3.9-7=2-посещают математику и биологию
ответ=2 ребят посещают математику и биологию
Program gt;
var n,q,a1,a2,a3,a4,a5,a6,a7,a8,a9,a0:integer;
begin
read(n);
a0:=0;a1:=0;
a2:=0;a3:=0;
a4:=0;a5:=0;
a6:=0;a7:=0;
a8:=0;a9:=0;
while n>0 do
begin
q:=n mod 10;
n:=n div 10;
if(q=0)then a0:=a0+1;
if(q=1)then a1:=a1+1;
***********************
***********************
if(q=9)then a9:=a9+1;
end;
if(a0>1)or(a1>1)or....(a9>1)then writeln('yes')else writeln('no');
end.
буз массива как-то так получиться
I = K * i (I - объем информации, K - кол-во пикселей, i - вес одного пикселя / глубина цвета)
i = I / K
K = 128 * 128 = 16384 пикселей
I = 2 Kb = 2 * 1024 * 8 бит = 16384 бит
Глубина цвета бит (округляем в меньшую сторону так, как тут могут быть только целые числа)
Кол-во цветов в палитре цветов
Ответ: 2
Пишу ответ на С++ и QBasic, если у Вас другой язык, то просто измените синтаксис:
1) min=10000;
number=0;
for (int i=0;i<5;i++)
{
if A[i]<min;
{
min=a[i];
number = i;
}
}
2)
<span>DECLARE FUNCTION f! (x!)
CLS INPUT "[A; B] = "; A, B
INPUT "SHAG H = "; n
FOR x = A TO B STEP n
n = n + 1
IF n MOD 20 = 0 THEN
PRINT "PRESS ENTER"
DO: LOOP UNTIL INKEY$ <> ""
CLS
ELSE
IF ABS(x) < 1 THEN
PRINT USING "X = ###.###"; x;
PRINT " Y = ---"
ELSE
PRINT USING "X = ###.### Y = ###.###"; x; f(x)
END IF
END IF
NEXT
END
FUNCTION f (x)
IF ABS(x) <= 3 THEN
IF ABS(x) >= -3 THEN f = x
ELSE
f = 1 / (x*x) END IF
END <span>FUNCTION</span></span>