А2=12
В2=4
С2=4
Соответственно D2 тоже должно быть равно 4 (по диаграмме)
То есть B2=8 (4*2=8)
//PascalABC.NET
//Версия 3.3, сборка 1627
function f(x: integer): boolean;
begin
f:=false;
var c:=0;
foreach var item in x.ToString.Select(t->t.ToDigit()).Where(r->r<>0) do
if (x mod item=0) then inc(c);
if c=x.ToString.Count then f:=true;
end;
begin
var n:=ReadInteger;
range(1,n).Where(x->f(x)).Println;
end.
Адаптивный веб-дизайн будет регулировать поток содержимого страницы по мере изменения областей просмотра, однако это еще не все. Версия HTML5 предлагает больше функций, чем HTML 4, и ее более значимые семантические элементы лягут в основу нашей разметки. Медиазапросы CSS3 — важная составная часть адаптивного веб-дизайна, а дополнительные CSS3-модули позволят нам достичь невиданных ранее уровней гибкости. Мы уберем фоновую графику и сложные сценарии JavaScript, заменив их легковесными CSS3-градиентами, тенями, версткой, анимацией и трансформациями.
Вот. :3
1)var a:array[1..15] of integer;
i,s:integer;
begin
randomize;
for i:=1 to 15 do a[i]:=random(20)+10;
for i:=1 to 15 do if a[i] mod 3=0 then s:=s+1;
writeln(s);
end.
2)var a: array[1..10] of integer;
i, s: integer;
begin
randomize;
for i := 1 to 10 do a[i] := random(21) - 10;
for i := 1 to 10 do if (a[i] > 0) and (a[i] mod 2 = 0) then s := s + 1;
writeln(s);
end.
-2 3
12 ()
-2 + 12/5 - 3 = (-5 * 5 + 12)/5 = -13/5 = -2.6
