Импортные аналоги в в туалет к ней зайди ко мне вчера и всякую возможность поставки в друзьях
Все можно вводить
.....................
Нажимаешь кнопку PrtScr,а потом вставляешь в любую графическую программу (например paint). Все просто)
19. См. первое вложение.
Полученное выражение можно упростить.
20. См. второе вложение.
Упростим полученное выражение.
F
<u>никогда</u> не будет принимать значение 1
<em>// PascalABC.NET 3.3, сборка 1583 от 25.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var n:=ReadInteger('n=');
var a:=ArrRandom(n,-99,99); a.Println;
var b:=ArrRandom(n,-99,99); b.Println;
a.Zip(b,(x,y)->x*y).Println
end.
<u>Пример</u>
n= 13
-33 -22 -61 -21 24 -40 -30 77 46 19 -60 2 53
-99 27 90 -13 -17 19 76 -85 -18 4 91 -93 -59
3267 -594 -5490 273 -408 -760 -2280 -6545 -828 76 -5460 -186 -3127