Facebook, Skype, Vkontakte,Odnoklasniki
Не разшифровается а,Расшифровавается
Ответ:Монитор
Количество лепестков количество листьев серединка ____________________________________________________________________
признаки признаки
4 лепестка,6,7. 3 лепестка,4,6. красная,фиолетовая,
синяя,жёлтая
Нажми там будет объведи и поделись с кем нибудь но это не точно если я не обишаюсь но у меня так
Var
a: array [1..100] of integer;
i: integer;
b: Int64 := 1;
begin
for i := 1 to 100 do
begin
a[i] := random(-2, 20);
write(a[i], ' ');
end;
writeln();
for i := 1 to 100 do
begin
b *= (a[i] < 0 ? abs(a[i]) : 1);
end;
writeln(b <= 100, '(', b, ')');
<span>end.</span>