//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var (a,b):=(ArrRandom(10,-100,100),ArrRandom(10,-100,100));
a.Println; b.Println;
end.
1 файл - случай б.
2 файл - случай а.
Можно уточнить именно плюсы и минусы чего? Суперкомпьютера или ПК? Или того и другого
Var i,n:integer;
begin
read(n);
for i := 1 to n do
writeln(i*i*i);
end.