G$5*$A12 , знак $ необходим для закрепления ячейки в формуле , в
<span>D$5 закрепляется строка , а столбец , при переносе формулы изменяется
ну и аналогично с </span><span>$A10.</span><span><span>Столбец</span> закрепляется , а строка изменяется . </span>
Ответ:
3. 12
Объяснение:
Здесь цикл с постусловием, который прерывается когда z = 0
x = 96 y = 54
z = x mod y = 96 mod 54 = 42
z = 0 (нет) х = у = 54 у = z = 42
x = 54 y = 42
z = x mod y = 54 mod 42 = 12
z = 0 (нет) х = у = 42 у = z = 12
x = 42 y = 12
z = x mod y = 42 mod 12 = 6
z = 0 (нет) х = у = 12 у = z = 6
x = 12 y = 6
z = x mod y = 12 mod 6 = 0
z = 0 (да)
x = 12 y = 6
var a,b,c,d:integer;
begin
read(d);
a:=d div 100;
b:= (d div 10) mod 10 ;
c:=d mod 10;
if (a+b+c) >15 then
writeln('YES')
else
writeln('NO');
readln;
end.
Здравствуйте! Попытаюсь обьснить понятно :"D
В первом случае Dat[1]= 12 не больше 14, поэтому действие m= m+1 не выполняется. То же самое происходит и во 2, и в 3 случаях. В четвертом случае Dat[4]=15 больше 14, поэтому m= 0+1=1. Дальше все происходит точно так же.
В итоге m=3.
Uses Crt;
Const
N = 15;
Var
B:array[1..N] of integer;
i:integer;
S:real;
Begin
ClrScr;
Randomize;
S:=0;
Write('B(',N,'):');
For i:= 1 to N do
Begin
B[i]:=random(71)+130;
Write(' ',B[i]);
S:=S+B[i]
End;
WriteLn;
WriteLn('Sr = ',S/N:0:2);
ReadLn
End.