//PascalABC.NET
begin
var product: int64;
product := 1;
var seq := range(1, 99).Where(x -> x mod 2 <> 0).Select(x -> x * x);
foreach var x in seq do
product := product * x;
write(product);
end.
В ромбе a mod 2=0
если да то sqr(a)
если нет то <span>exp(3*ln(a))
Надеюсь на лучший ответ:)</span>
CPU ---> Процессор
RAM ---> Оперативная память
ROM ---> Постоянная память
HDD ---> Жёсткий диск
Sound Card ---> Звуковая карта
Video Card ---> Видео карта
Отсутствовали 30лет всего прилетело:21-22
У зеленых детей: 0
Ответ е2)
муравей двигается по полю