//PascalABC.NET версия 3.2, сборка 1389
//Если программа не запускается, то обновите версию
begin
var a := SeqWhile(1, i -> i + 1, i -> i < 20);
Println(a);
Println(a.Where(x -> x mod 3 = 0).Average);
Writeln();
for var i := ReadInteger('a =') to ReadInteger('b =') do
writeln(i, ' ', i * i, ' ', i * i * i);
end.
1)?
2)Поле имён,ряд формул,текущая клетка
Я не понял скажи какой вапрос?
Ща все решу! Вжух и все готово!!!
а)455
б)283
в)<span>613.5625
</span>г)<span>73.375
</span>д)<span>221.875
</span><span>е)</span>332.625
1.подмножество;2.множество;3.Пересечение;4.схема;5.объединение;6.эйлер;7.отношения;8.объект.