PascalABC не позволяет считать столь большие числа, но если бы он позволял делать это, то следующий код работал бы: program z1;vara, i: longint;begina := 1; i := 10000; while (i < 100001) dobegina := a * i;i := i + 2000;end;writeln(a);end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
